Даны два целых числа A и B (A < B). Вывести все целые числа, расположенные между данными числами (включая сами эти числа), в порядке их возрастания, а также количество N этих чисел.
Желательно всю программу)
Заранее огромное спасибо)
Ответы
Ответ дал:
0
var a,b,n:integer;
begin
read(a,b);
write(a);
repeat
a:=a+1;
write(a);
n:=n+1;
until a=b;
writeln;
writeln(n);
end.
begin
read(a,b);
write(a);
repeat
a:=a+1;
write(a);
n:=n+1;
until a=b;
writeln;
writeln(n);
end.
Ответ дал:
0
Спасибо
Вас заинтересует
2 года назад
2 года назад
7 лет назад
9 лет назад
9 лет назад