Teen
6 год назад
Составить программу для ввода на экран не чётных чисел от -25 до 25
ОТВЕТЫ
Viakon
Aug 9, 2019
Var
i : integer;
begin
for i:= -25 to 25 do
if i mod 2 lt;gt; 0 then
writeln(i);
end;
end.
i : integer;
begin
for i:= -25 to 25 do
if i mod 2 lt;gt; 0 then
writeln(i);
end;
end.
29
