Предмет: Информатика,
автор: blakwars
Найти произведение 1 • 2 • 3 • ... • n
В паскале, те а цикл
Ответы
Автор ответа:
1
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var n:=ReadInteger;
var p:=1.0;
for var i:=1 to n do p:=p*i;
write(p);
end.
//Версия 3.3, сборка 1634
begin
var n:=ReadInteger;
var p:=1.0;
for var i:=1 to n do p:=p*i;
write(p);
end.
Интересные вопросы
Предмет: Литература,
автор: pavlopankivskij
Предмет: Українська мова,
автор: bociavit534
Предмет: Музыка,
автор: skorinaKristina205
Предмет: Математика,
автор: яки2
Предмет: Химия,
автор: bla0bla0bla0504