Цикл for (Pascal)

решить задачку при помощи этого цикла:

напечатать все нечетные числа от 3 до 25

Question

Юлиана

30 августа, 23:51

+3

Ответы (1)

Знаете ответ на вопрос?

Эра · Answer 1

Var a:integer;

begin

for a:=3 to 25 do

begin

if (a mod 2 = 1) then writeln (a) ;

end;

end.

Цикл for (Pascal)решить задачку при помощи этого цикла:напечатать все нечетные числа от 3 до 25