Помогите! Тема была циклы. Нужно нарисовать блок схему и написать программу ** языке ТП(...

Question

Помогите!
Тема была циклы. Нужно нарисовать блок схему и написать программу на языке ТП( ТурбоПаскаль)
Пожалуйста, если можно то по подробнее!
Задача во вложении!

---

Answer 1

Блок-схемы - в прилагаемых файлах.
Программы:
1)
var i:integer; p:longint;
begin
p:=1;
for i:=5 to 12 do p:=p*i;
writeln('p = ',p);
readln;end.

var i:integer; p:longint;
begin
p:=1;
for i:=12 downto 5 do p:=p*i;
writeln('p = ',p);
readln;end.

Результат:
p = 19958400

---

Comments

p:longint; что это, можете подсказать?