Составте программу которая находит произведение всех - вопрос №20440271 от karinaklinaeva 09.02.2021 16:12

Question

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

karinaklinaeva · Answer

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