Рассчитать и вывести произведение чисел от 1 до 30

Question

Рассчитать и вывести произведение чисел от 1 до 30

Comments

на паскале?

---

Это задача по информатике. Нужно составить блок схему.

Answer 1

Program oneTO30
var
h:integer;
BEGIN
for int i:=2 to 30 do
h:=h*i;
writeln(h);  \\или readln ... забыл
END.

Answer 2

var    i: integer;  begin  for i:= 1 to 30 do  writeln(i);end.

Вот код вывода чисел от 1 до 30, либо я не понял вопроса, либо вам дорога не в программирование

Comments

var
i: integer;

begin
for i:= 1 to 30 do
writeln(i);
end.