Пользователь4 года назад
ПожаловатьсяПожаловаться

Даны два целых числа A и B (A < B). Вывести все целые числа, расположенные между данными числами (включая сами эти числа), в порядке их возрастания, а также количество N этих чисел.(while в паскале)

Ответы2

Аватар
Евгений4 года назад
По условию нам заданы два целых числа A и B (A < B). Составим программу на языке программирования Паскаль, которая выводит все целые числа, расположенные между заданными числами (включая сами эти числа): programm dvachisla; var a, b, n: integer; i: real; begin write ('Введите первое число а = '); readln (a); write ('Введите второе число b = '); readln (b); n:= 0; for i:= a to b do begin write (a : 4); n:= n + 1; a:= a + 1; end; writeln ('Всего таких чисел получается ',n); end.
Рекомендации Учи.Ответов
УЧИ.РУ
Разобраться в сложных темах по школьным предметам помогут курсы Учи.ру
Заниматься
Аватар
Лилия4 года назад
var a,b,i,k :integer; begin read(a,b); k:=0; for i:= b -1 downto (a-1) do begin k:=k+1; write (i,' '); end; writeln('Количество этих чисел = ', k); end.