Нет перегруженной подпрограммы с таким количеством параметров Power где ошибки?
var s, p, x: real; l, m, n: integer;
begin
for l := m to n do
begin
p:=p*x/l;
s:=s+p
end;
write('x m n: ');
readln(x, m, n);
if m > n then
begin
l:=n;
n:=m;
m:=l
end;
s:= 0;
p:=power(m - 1);
writeln(s)
end.

225

470

Посмотреть ответы 1

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

sacredand

Информатика

4,5(38 оценок)

во времена древнего, среднего и нового царств количество иероглифов приблизительно равнялось 800. в греко-римский период их число превысило 6000 иероглифов.среди египетских иероглифов выделяют две основные группы символов – звуковые знаки и смысловые знаки.