Фарафон
5 год назад
Пожалуйста посчитайте!Тема была циклы. Нужно нарисовать блок схему и написать программу на языке ТП( ТурбоПаскаль) Пожалуйста, если можно то по подробнее!Задание во вложении!
ОТВЕТЫ
Goodman Noel
Oct 24, 2020
Блок-схемы - в прилагаемых файлах.
Программы:
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
Программы:
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
- p:longint; что это, можете подсказать?
653
Смежные вопросы:
