Вывести на экран только положительные целые числа из диапазона от А до В (А<=B) (сделать в паскале)

var

  a, b, i : integer;

begin

  read (a, b);

  for i := a to b do if i > 0 then writeln (i);

end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку