Предмет: Информатика,
автор: drobotlilija
с использованием цикла While ... do составить программу,которая рассчитывает выражение В=m(m+1)...(m+m) в случае целого числа m
Ответы
Автор ответа:
0
readln(m);
rez:=1;
while (i<=m) do
begin
rez:=rez*m;
inc(m);
inc(i);
end;
write(rez);
rez:=1;
while (i<=m) do
begin
rez:=rez*m;
inc(m);
inc(i);
end;
write(rez);
Похожие вопросы
Предмет: Алгебра,
автор: Furas
Предмет: Математика,
автор: helenshevchenko09
Предмет: Математика,
автор: nika9090847
Предмет: История,
автор: Аноним
Предмет: История,
автор: voolkovaa