Question

вывести на экран последовательность четных чисел от -30 до +30 (на паскале)

Answer 1

var
i:integer;
begin for i:=-30 to 30 do
if i mod 2 = 0 then 
write(i,' ');end.