решите задачу по информатике через Integer.
с ЦИКЛОМ.
Надо узнать произведения цифр от 1 до N
Например: n=5 нужно 1×2×3×4×5=150
Ответы
Ответ дал:
0
PascalABC.NET 3.3.5, сборка 1644 от 23.03.2018
Внимание! Если программа не работает, обновите версию!
begin
var p:=1;
for var i:=2 to ReadInteger('n=') do p*=i;
Writeln(p)
end.
Пример
n= 5
120
Внимание! Если программа не работает, обновите версию!
begin
var p:=1;
for var i:=2 to ReadInteger('n=') do p*=i;
Writeln(p)
end.
Пример
n= 5
120
Ответ дал:
0
Ну так, он тебе сделал через int. Что тебе не нравится?
Ответ дал:
0
Замените longint на integer
Ответ дал:
0
Просто будет меньше диапазон чисел, в которых программа даст верный ответ
Ответ дал:
0
Хотя нет, в PascalABС.NET integer = longint
Ответ дал:
0
Поправил, чтобы понятнее было
Вас заинтересует
2 года назад
3 года назад
3 года назад
9 лет назад
9 лет назад
10 лет назад