Паскаль розробіть програму, яка визначатиме добуток чисел від 1 до 30

Kushakeevich Kushakeevich    3   30.06.2019 19:30    3

Ответы
Snikers2018 Snikers2018  24.07.2020 10:47
Program al;
var p,i:integer;
   begin 
   p:=1;
   for i:= 1 to 30 do 
 p:=p*i;   
writeln('p=',p); 
  readln; 
  end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика

Популярные вопросы