Разберите и выполните программу , выходящую на эран вск четные числа в интервале от 1 до 40

Question

Информатика: Разберите и выполните программу , выходящую на эран вск четные числа в интервале от 1 до 40

Mom34 · Answer

Var  i:longint;begin for i:=1 to 40 do If odd(i) then else write(i );end....