§ 2.4. Запись вспомогательных алгоритмов на языке Паскаль ГДЗ по Информатике 9 класс. Босова.
Напишите программу вычисления выражения: s = х3 + х5 + хn, где х и n вводятся с клавиатуры. Используйте подпрограмму вычисления степени.
Ответ
Здесь нет явных ограничений на х и n. В связи с этим может возникнуть потребность в типе longint.
program vyrazhenie;
var х, n : integer; s: longint;
function st (а, b: integer): longint;
var i: integer; rez: longint;
begin
rez:= 1;
for i:=1 to b do rez:=rez*a;
st:=rez
end;
begin
write (‘х = ‘);
readln (х);
write (‘n = ‘);
readln (n);
s:=st(x, З)+st(x, 5)+st(x, n);
writeln (‘s = ‘, s)
end.