Ответы
Ответ дал:
0
Или так: это проще, если вы не проходили условие.
Var i:integer;
Begin
write('Четные числа: ');
for i:=2 to 99 do begin
write(i,' ');
i:=i+1;
end;
End.
Var i:integer;
Begin
write('Четные числа: ');
for i:=2 to 99 do begin
write(i,' ');
i:=i+1;
end;
End.
Вас заинтересует
1 год назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад