Выведите на экран в строку все числа первой сотни, но только четные

airmenplay airmenplay    2   30.06.2019 20:40    0

Ответы
tuk33 tuk33  24.07.2020 11:06
Var a,b,c:integer;
begin
for a:=1 to 100 do begin
if a mod 2 = 0 then write(' ',a,' ');
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика