Информатика, опубликовано 2018-08-22 23:32:48 by Гость

Паскаль розробіть програму, яка визначатиме добуток чисел від 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.

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.