Дополнительное задание 1 Параграф 27 ГДЗ Семакин 8 класс (Информатика)
- Составьте на Паскале программу возведения в $$N$$-ую степень целого числа $$X$$.
- Запишите на языке Паскаль программу, соответствующую приведённой ниже блок-схеме, и определите, что вычисляет данная программа.
- Составьте на языке Паскаль программу вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа $$N$$. Постройте трассировочную таблицу.
1. Для возведения числа $$X$$ в степень $$N$$ удобно использовать цикл: сначала присвоить произведению значение $$1$$, затем $$N$$ раз умножить его на $$X$$.
program task_1;
var
x, n, s, i: integer;
begin
write(‘Введи X и N через пробел >> ‘);
readln(x, n);
s := 1;
for i := 1 to n do
s := s * x;
writeln(x, ‘ в степени ‘, n, ‘ = ‘, s);
end.
2. По блок-схеме программа сначала вводит число $$N$$, затем обнуляет сумму $$S$$. Пока $$N \ne 0$$, к сумме прибавляется текущее значение $$N$$, после чего вводится следующее число. Когда введён $$0$$, выводится сумма.
program t_2;
var
n, s: integer;
begin
write(‘n > ‘);
readln(n);
s := 0;
while n <> 0 do
begin
s := s + n;
write(‘n > ‘);
readln(n);
end;
writeln(‘S=’, s);
end.
Данная программа вычисляет сумму всех введённых с клавиатуры чисел до появления $$0$$.
3. Сумма всех натуральных чисел, не превышающих $$N$$, находится последовательным сложением чисел от $$1$$ до $$N$$.
program t_3;
var
n, s, i: integer;
begin
write(‘n > ‘);
readln(n);
s := 0;
for i := 1 to n do
s := s + i;
writeln(‘S=’, s);
end.
Трассировочная таблица при $$N = 7$$:
| $$i$$ | $$s$$ |
|---|---|
| — | 0 |
| 1 | 1 |
| 2 | 3 |
| 3 | 6 |
| 4 | 10 |
| 5 | 15 |
| 6 | 21 |
| 7 | 28 |
Ответ
1) Программа возводит целое число $$X$$ в степень $$N$$.
2) Программа вычисляет сумму введённых чисел до ввода $$0$$.
3) При $$N = 7$$ получаем $$S = 28$$.




