Регистрация
TheMissteress
22.07.2021 19:44
Информатика
Есть ответ 👍

Написать программу вычисления произведений в паскаль 2*4*6**(2n). решить

275
280
Посмотреть ответы 3

Ответы на вопрос:

tarasyukov
tarasyukov
4,4(97 оценок)

var n, y, i: integer; begin  readln(n); y : = 1; i : = 0;   repeat      inc(i);       y : = y * 2 * i;   until i = n;   writeln(y);   readln; end.

Ангелина8281
Ангелина8281
4,6(39 оценок)

через рекурсию

 

var

functionproduct(n: integer): integer;

begin

if n = 1then

begin

product : = 2;

exit;

end;

product : = 2 * n * product(n - 1);

end;

 

 

var

n: integer;

begin

readln(n);

writeln(product(n));

readln;

end.

 

без рекурсии

 

n, y, i: integer;

 

begin

readln(n); y : = 1; i : = 0;

repeat

inc(i);

y : = y * 2 * i;

until i = n;

writeln(y);

readln;

end.

anna080203
anna080203
4,5(42 оценок)

2)5.6.7.8

Объяснение:

Популярно: Информатика