Паскаль
розробіть програму, яка визначатиме добуток чисел від 1 до 30
Program al;
var p,i:integer;
begin
p:=1;
for i:= 1 to 30 do
p:=p*i;
writeln(p=,p);
readln;
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
