Составте программу которая находит произведение всех - вопрос №2043125 от lililobanova20 08.09.2021 21:33

Question

Информатика: Составте программу которая находит произведение всех натуральных чисел от 1 до 20

lililobanova20 · Answer

Var a,p:integer;begin  p:=1;  for a:=1 to 20 do    p:=s*a;  writeln(p);end....