Bazan
5 год назад
Написать программу в паскале
напечатать все положительные нечётные трёхзначные числа
ОТВЕТЫ
Albertovich
Jun 29, 2019
Program rd;
var i:integer;
begin
for i:=100 to 999 do if i mod 2 = 1 then write(i, );
end.
var i:integer;
begin
for i:=100 to 999 do if i mod 2 = 1 then write(i, );
end.
PascalABC.NET 3.2
begin Range(101,999,2).Println end.
begin Range(101,999,2).Println end.
134
Смежные вопросы: