Создать в паскале программу подсчёта произведения n последовательных натуральных чисел начиная с одного!

nastya06nastik nastya06nastik    3   20.05.2019 16:50    1

Ответы
dianaryabovaa dianaryabovaa  14.06.2020 03:24

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика