Составте программу которая находит произведение - вопрос №20440271 от Дашуточка2005 10.05.2022 19:54

Question

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

Дашуточка2005 · Answer

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