✅ Перевірена відповідь на це питання доступна нижче. Наші рішення, перевірені спільнотою, допомагають краще зрозуміти матеріал.
Consider the following code snippet. What does it do?
procedure TForm1.btnProcessClick(Sender: TObject);
var
i: integer;
begin
for i := 1 to 10 do
begin
if i mod 2 = 0 then
Memo1.Lines.Add('The number is even: ' + IntToStr(i))
else
Memo1.Lines.Add('The number is odd: ' + IntToStr(i));
end;
end;