Вывести на экран только положительные целые числа из диапазона от А до В (А<=B) (сделать в паскале)
Ответы
Ответ дал:
0
var
a, b, i : integer;
begin
read (a, b);
for i := a to b do if i > 0 then writeln (i);
end.
Ответ дал:
0
Program Zadacha;
var
a, b, i : integer;
begin
Read(a, b);
if b>0 then
for i:=1 to b do
Write(i, ' ');
end.
Похожие вопросы
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад