1. написать программу, которая выводит произведение чисел от 1 до 13 (13! )

Question

Информатика: 1. написать программу, которая выводит произведение чисел от 1 до 13 (13! )

annagj200430 · Answer

Var  i:integer;  f:double;begin  f:=1;  for i:=1 to 13 do f:=f*i;  Writeln( 13!= ,f:0);end.Результат выполнения программы:13!=6227020800...