Предмет: Информатика,
автор: ElizavetaLiz
Даны два целых числа 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
Спасибо
Похожие вопросы
Предмет: Геометрия,
автор: Аноним
Предмет: Математика,
автор: gorbacevatana2
Предмет: Математика,
автор: mblohin2009
Предмет: Математика,
автор: lailanad