Предмет: Информатика,
автор: Sergey3331
Создать в Паскале программу подсчёта произведения N последовательных натуральных чисел начиная с одного!
Ответы
Автор ответа:
0
program p;
var n,i,o: integer;
begin
o:=1;
writeln('Введите колчиство чисел:');
readln(n);
for i:=1 to n do o:=o*i;
writeln('Ответ:',o);
readln; end.
Интересные вопросы
Предмет: История,
автор: SanyaSok1
Предмет: Математика,
автор: Аноним
Предмет: Математика,
автор: lopa29
Предмет: Информатика,
автор: Аноним
Предмет: Алгебра,
автор: rahcia