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

SofyaIlina SofyaIlina    3   19.05.2019 02:00    1

Ответы
artyomburyanov artyomburyanov  30.09.2020 21:40

var

  a, b, i : integer;

begin

  read (a, b);

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

end.

ПОКАЗАТЬ ОТВЕТЫ
Blanco2017 Blanco2017  30.09.2020 21:40

Program Zadacha;
var
    a, b, i : integer;
begin
  Read(a, b);

  if b>0 then
    for i:=1 to b do
        Write(i, ' ');
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика