Помогите решить задачу в Pascal ABC. Даны два целых числа (А<В). Вывести в порядке возрастания все целые числа расположенные между А и В(не включая
5-9 класс
|
сами числа А и В) и их количество
var a,b,c,d:integer;
begin
d:=0;
writeln('Введите число А');
readln(a);
writeln('Введите число B');
readln(b);
for c:=(a+1) to (b-1) do
begin
writeln(c);
d:=d+1;
end;
writeln('Количество чисел равняется ',d);
end.
Другие вопросы из категории
целый вес от 1 до..." вместо многоточия необходимо поставить,как можно больший вес так,чтобы утверждение оставалось верным.Какой же вес следует выбрать?
А) 5 кг; Б)6 кг;В)7 кг; Г)4 кг
очень надо!! пожалуйста
Читайте также
сами числа А и В), а так же кол-во N этих чисел.
За ранее спасибо!)
что угодно, помогу)Вот задача - Под конец учебного года ученики 11 класса решали понять у кого же из них будет самый высокий средний балл ? Известно , что - в классе учится 14 учеников, - Сумма всех средних баллов аттестата = 100.Известно также , что первый ученик имел средний балл, который составляет 1/ 12 суммы всех средних баллов. Второй ученик - на 0,15 % больше, чем первый ученик , но на 1,75 % меньше , чем третий ученик . Средние баллы аттестатов двух сестер были равными среднему арефметичному оценок вышеупомянутых учеников , разделенном на 1.5 . Четвертый ученика на конец года имел такой же балл , как и первый ученик , но на 5% меньше , а остальные ученики - имели равные баллы .Какой средний балл на конец года получил каждЫй?
Даны два целых числа. Разделить каждое число на целое число d.
Найти произведение их остатков от деления.
№1 Дан массив, состоящий из n натуральных чисел. Образовать новый массив, элементами которого будут элементы исходного, оканчивающиеся на цифру k.
№2 Дан масив целых числ. Найти в этом массиве минимальный элмент m и максимальный M. Получить в порядке возрастания все целые числа из интервала (m;M), которые не входят в данный массив.
№3 Сформировать массив простых чисел , не больших заданного натурального числа N.
№4 Сформировать массив простых множителей заданного числа.
СУММЕ КУБОВ ЕГО ЦИФР. Помогите, пожалуйста