Выведите на экран все нечетные числа от 31 до 1023
Var min, max: integer;
begin
max := 1023;
for min := 31 to max do
if ( min mod 2 <> 0 ) then write( min, );
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
