Напишите на паскаль. 1. вывести все четные числа от 0 до n (n вводится с клавиатуры)

Thelow26 Thelow26    1   06.06.2019 01:20    11

Ответы
shvanova2017 shvanova2017  06.07.2020 10:41
Var i,N:integer;
begin
readln(N);
for i:=1 to N do begin
if (i mod 2= 0)
then
write(i,' ');
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика