Question

запишите на языке Паскаль программу которая перемножает числа от 1 до 10 и выводит на экран полученный результат

Answer 1

Program n1;
var i,p: integer;
begin
p:=1;
for i:=1 to 10 do p:=p*i;
writeln(p);
end.