Задача в Pascal abc.

Среди чисел из отрезка [1; 10] вывести на экран только четные

Question

Изабелла

17 марта, 03:38

+4

Ответы (1)

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

Агита · Answer 1

Program z1;

uses crt;

var i:integer;

begin

for i:=1 to 10 do

if (i mod 2=0) then

writeln (i) ;

end.

Задача в Pascal abc.Среди чисел из отрезка [1; 10] вывести на экран только четные