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

mazaliaopera mazaliaopera    2   27.05.2019 17:10    0

Ответы
AdelinaAries AdelinaAries  24.06.2020 19:01
Var a,p:integer;
begin
  p:=1;
  for a:=1 to 20 do
    p:=s*a;
  writeln(p);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика