var i, n, a, p: integer; begin writeln('Vvedi N: '); readln(n); writeln('Vvedi A: '); readln(a); p := 1; for i := 0 to sqr(n) do begin p := p * (a - n); n := n * 2; end; writeln(p); readln; end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
