Вывести целые четные числа от 1 до 10 Пожалуйста помогите!Буду благодарен!
Вывести целые четные числа от 1 до 10
Пожалуйста помогите!Буду благодарен!
Гость
Ответ(ы) на вопрос:
ГостьVar i : Byte;
Begin
For i:=1 to 5 do Write(i*2,' ');
end.
Не нашли ответ?
Похожие вопросы