Помогите!
Тема была циклы. Нужно нарисовать блок схему и написать программу на языке ТП( ТурбоПаскаль)
Пожалуйста, если можно то по подробнее!
Задача во вложении!
Тема была циклы. Нужно нарисовать блок схему и написать программу на языке ТП( ТурбоПаскаль)
Пожалуйста, если можно то по подробнее!
Задача во вложении!
More Questions From This User See All
Answers & Comments
Verified answer
Блок-схемы - в прилагаемых файлах.Программы:
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