Цикл for (Pascal)

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

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

Question

Маврикий

21 апреля, 02:09

+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