ПОМОГИТЕ С ПАСКАЛЕМ ПОЖАЛУЙСТА
Составить программу
Для введённых с клавиатеры чисел каждое число умножить на предыдущее. Вывести на печать результат вычислений. Количество чисел ограничено вторым введённым числом
Ответы
Ответ дал:
0
Program pas
var a, b, c: integer;
begin
writeln('Введите первое число');
readln(a);
Writeln('Введите второе число');
readln(b);
c:= b*a;
writeln('Результат=', c);
end.
var a, b, c: integer;
begin
writeln('Введите первое число');
readln(a);
Writeln('Введите второе число');
readln(b);
c:= b*a;
writeln('Результат=', c);
end.
Ответ дал:
0
PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018
Внимание! Если программа не работает, обновите версию!
begin
Print(ReadlnInteger('1-е число:') * ReadlnInteger('2-е число:'))
end.
Похожие вопросы
2 года назад
2 года назад
2 года назад
8 лет назад
8 лет назад
9 лет назад