Задание 8 Параграф 1.2 ГДЗ Босова 9 класс 2023 (Информатика)

Задача

s = х3 + х5 + хn,
где х и n вводятся с клавиатуры. Используйте подпрограмму вычисления степени.
var
s, x, i, n: integer;
function st(a, d: integer): integer;
var
stt, j: integer;
begin
stt := 1;
for j := 1 to d do
stt := stt * a;
st := stt;
end;
begin
s := 0;
write(‘Введите x,n > > ‘);
readln(x, n);
s := st(x, 3) + st(x, 5) + st(x, n);
writeln(‘Сумма = ‘, s);
end.

Подробный ответ

Для вычисления суммы $$s = x^3 + x^5 + x^n$$ удобно вынести возведение в степень в отдельную подпрограмму-функцию.

Функция st(a, d) последовательно умножает число $$a$$ само на себя $$d$$ раз и возвращает результат.

var
  s, x, i, n: integer;
function st(a, d: integer): integer;
var
  stt, j: integer;
begin
  stt := 1;
  for j := 1 to d do
    stt := stt * a;
  st := stt;
end;
begin
  s := 0;
  write(‘Введите x,n >> ‘);
  readln(x, n);
  s := st(x, 3) + st(x, 5) + st(x, n);
  writeln(‘Сумма = ‘, s);
end.

В основной программе вводятся $$x$$ и $$n$$, затем вычисляются значения $$x^3$$, $$x^5$$ и $$x^n$$, после чего находится их сумма.

Ответ

Программа на Паскале:

var
  s, x, i, n: integer;
function st(a, d: integer): integer;
var
  stt, j: integer;
begin
  stt := 1;
  for j := 1 to d do
    stt := stt * a;
  st := stt;
end;
begin
  s := 0;
  write(‘Введите x,n >> ‘);
  readln(x, n);
  s := st(x, 3) + st(x, 5) + st(x, n);
  writeln(‘Сумма = ‘, s);
end.