1-11 класс
  • 1-11 класс
  • 1 класс
  • 2 класс
  • 3 класс
  • 4 класс
  • 5 класс
  • 6 класс
  • 7 класс
  • 8 класс
  • 9 класс
  • 10 класс
  • 11 класс
Выберите класс
Предметы
Семакин
Дополнительное задание 2 Параграф 27 ГДЗ Семакин 8 класс (Информатика)
Семакин, Залогова
8 класс
Автор
Семакин, Залогова

Дополнительное задание 2 Параграф 27 ГДЗ Семакин 8 класс (Информатика)

Задача

Практическое задание №23
Тема: Использование циклов в вычислительных алгоритмах
1 уровень сложности
1. Разработать схему алгоритма, который запрашивает N произвольных целых чисел и ищет их сумму. Число N вводится с клавиатуры. Разработать для созданного алгоритма не менее трёх тестов и проверить на них правильность работы алгоритма.
2. Разработать схему алгоритма для вычисления суммы ряда:
Число N вводится с клавиатуры.
Протестировать алгоритм для N=1, N=2, N=4, N=6. Правильность ответов проверить с помощью калькулятора.
3. Одноклеточная амёба каждые три часа делится на 2 клетки. Разработать схему алгоритма для определения, сколько амёб будет через 3, 6, 9, 12 и 24 часа.
4. Дано натуральное число N и действительное число x. Разработать схему алгоритма для вычисления суммы ряда:
sin x + sin 2x+sin 3x+…sin N*X
Протестировать алгоритм для x=1.5 и N=3. Проверить правильность ответа на калькуляторе.
5. Разработать схему алгоритма для вычисления N-ой степени числа a (aN). Протестировать алгоритм для а) a=3 и N=4, б) a=2 и N=5.
1.
алг
нач
. цел n,s,a
. ввод n
. s:=0
. нц n раз
. . ввод a
. . s:=s+a
. кц
. вывод s
кон
2.
алг
нач
. цел n,i
. вещ s
. ввод n
. s:=0; i:=0
. нц n раз
. . i:=i+1
. . s:=s+1/i
. кц
. вывод s
кон
3.
алг
нач
. цел t,n,i
. ввод t
. n:=1;i:=0
. нц пока i < t . . n:=n*2 . . i:=i+3 . кц . вывод n кон 4. алг нач . цел n,i . вещ x,a,s . ввод n . ввод x . s:=0; a:=x;i:=0; . нц n раз . . i:=i+1 . . x:=a*i . . s:=s+sin(x) . кц . вывод s кон 5. алг нач . цел n,a,st,i . ввод n,a . i:=0;st:=1 . нц n раз . . i:=i+1 . . st:=st*a . кц . вывод st кон 2 уровень сложности 1. Начав тренировки, спортсмен в первый день пробежал 10 км. Каждый день он увеличивал дневную норму на 10% нормы предыдущего дня. Какой суммарный путь пробежит спортсмен за N дней? Разработать схему алгоритма для решения этой задачи. Протестировать алгоритм для N=3 и N=7. 2. Ежемесячная стипендия студента составляет A рублей в месяц, а расходы на проживание превышают стипендию и составляют B рублей в месяц. Рост цен ежемесячно увеличивает расходы на 3%. Разработать схему алгоритма для расчёта необходимой суммы денег, которую надо единовременно попросить у родителей, чтобы можно было прожить учебный год (10 месяцев), используя только эти деньги и стипендию. Протестировать алгоритм для следующих исходных данных: а) A=1000, B=1100 б) A=900, B=1000 в) A=600, B=1200 3. Разработать схему алгоритма для нахождения всех делителей натурального числа N. Протестировать алгоритм для N=10, N=75, N=99, N=13. 4. Разработать схему алгоритма для вычисления N! (факториал числа N). Факториал вычисляется по формуле: N!= Операцию вычисления факториала использовать нельзя! Протестировать алгоритм для N=0, N=2 N=4. 1. алг нач . цел n,i . вещ s,a . ввод n . a:=10;s:=a . нц n-1 раз . . a:=a*1.1 . . s:=s+a . кц . вывод s кон 2. алг нач . цел n . вещ s,b . ввод n |стипендия . ввод b |расход за первый месяц . s:=b . нц 9 раз . . b:=b*1.03 . . s:=s+b . кц . вывод s-n*10|взнос родителей кон 3. алг нач . цел n,i . ввод n . i:=0 . нц n раз . . i:=i+1 . . если mod(n,i)=0 то вывод i,' ' все . . . кц . кон 4. алг нач . цел n,i,fac . ввод n . i:=1 . если n=0 то fac:=1 . . иначе . . . fac:=1 . . . нц n-1 раз . . . . i:=i+1 . . . . fac:=fac*i . . . кц . все . вывод fac кон 3 уровень сложности 1. Дано натуральное число N. Разработать схему алгоритма для вычисления суммы ряда: S=1!+2!+3!+…+N! (N > 1)
Операцию вычисления факториала использовать нельзя!
Протестировать алгоритм для N=3 и N=5
2. Покупатель должен заплатить в кассу S рублей. У него имеются монеты в 1, 2 и 5 рублей, а также купюры достоинством в 10, 50, 100 и 500 рублей (достаточное количество). Сколько монет и купюр разного достоинства отдаст покупатель, если он начинает платить с самых крупных? Операции целочисленного деления (div и mod) использовать нельзя. Разработать схему алгоритма для решения этой задачи. Протестировать алгоритм для S=567, S=1025, S=64, S=13.
3. Числа Фибоначчи (fn) определяются формулами:
f0=f1=1, fn=fn-1+fn-2 при n=2,3,…
Разработать схему алгоритма для вычисления числа Фибоначчи. Определить f10, f25, f40.
4. Разработать схему алгоритма, определяющего, является ли заданное число N простым. Протестировать алгоритм для N=10, N=31, N=13, N=51.
5. Даны натуральное N и действительное x. Разработать схему алгоритма для вычисления суммы ряда:
sin x+sin x2+sin x3+…+sin xN
Протестировать алгоритм для а) x=0.5, N=3, б) x=1, N=5. Проверить правильность его работы с помощью калькулятора.
1.
алг
нач
. цел n,i,j,fac,s
. ввод n
. i:=0
. s:=0
. нц n раз
. . i:=i+1
. . fac:=1
. . j:=0
. . нц i раз
. . . j:=j+1
. . . fac:=fac*j
. . кц
. . s:=s+fac
. кц
. вывод s
кон
2.
алг
нач
. цел s,k500,k100,k50,k10,m5,m2,m1
. k500:=0; k100:=0;k50:=0;k10:=0
. m5:=0;m2:=0;m1:=0
. ввод s
. нц пока s-500 > =0
. . k500:=k500+1
. . s:=s-500
. кц
. нц пока s-100 > =0
. . k100:=k100+1
. . s:=s-100
. кц
. нц пока s-50 > =0
. . k50:=k50+1
. . s:=s-50
. кц
. нц пока s-10 > =0
. . k10:=k10+1
. . s:=s-10
. кц
. нц пока s-5 > =0
. . m5:=m5+1
. . s:=s-5
. кц
. нц пока s-2 > =0
. . m2:=m2+1
. . s:=s-2
. кц
. m1:=s
. вывод ‘500 > ‘,k500,’ ‘
. вывод ‘100 > ‘,k100,’ ‘
. вывод ’50 > ‘,k50,’ ‘
. вывод ’10 > ‘,k10,’ ‘
. вывод ‘5 > ‘,m5,’ ‘
. вывод ‘2 > ‘,m2,’ ‘
. вывод ‘1 > ‘,m1,’ ‘
кон
3.
алг
нач
. цел n,f,f1,f2,i
. ввод n
. если n=0 или n=1 то f:=1
. . иначе
. . . f1:=1;f2:=1; i:=1
. . . нц n-1 раз
. . . . f:=f1+f2
. . . . f1:=f2;f2:=f
. . . кц
. все
. вывод f
кон
4.
алг
нач
. цел n,f,i
. ввод n
. i:=1;f:=1
. нц n-2 раз
. . i:=i+1
. . если mod(n,i)=0 то f:=0 все
. . вывод n,’ ‘,i,’;’
. кц
. если f=1 то вывод ‘простое’
. . иначе вывод ‘не простое’
. все
.
кон
5.
алг
нач
. цел n
. вещ x,s,a
. ввод n,x
. a:=x;s:=0
. нц n раз
. . s:=s+sin(x)
. . x:=x*a
. кц
. вывод s
.
кон
Практическое задание №24
Тема: Программирование циклов на Паскале
1 уровень сложности
1. Написать на Паскале программу, которая запрашивает с клавиатуры N произвольных целых чисел и ищет их сумму. Число N вводится с клавиатуры. Разработать для созданной программы не менее трёх тестов и проверить на них правильность работы алгоритма.
2. Составить на Паскале программу для вычисления суммы ряда:
Число N вводится с клавиатуры.
Протестировать программу для N=1, N=2, N=4, N=6. Правильность ответов проверить с помощью калькулятора.
3. Одноклеточная амёба каждые три часа делится на 2 клетки. Определить, сколько амёб будет через 3, 6, 9, 12 и 24 часа.
4. Дано натуральное число N и действительное число x. Вычислить сумму ряда:
sin x + sin 2x+sin 3x+…sin N*X
Протестировать программу для x=1.5 и N=3. Проверить правильность ответа на калькуляторе.
5. Написать программу для вычисления N-ой степени числа a (aN). Протестировать программу для а) a=3 и N=4, б) a=2 и N=5.
1.
program task_1;
var
i, n, s, a: integer;
begin
write(‘N > ‘);
readln(n);
s := 0;
for i := 1 to n do
begin
write(«a > «);
readln(a);
s := s + a
end;
writeln(‘SUM=’, s)
end.
2.
program task_2;
var
i, n: integer;
s: real;
begin
write(‘N > ‘);
readln(n);
s := 1;
for i := 2 to n do
s := s + 1 / i;
writeln(‘SUM=’, s:5:2)
end.
3.
program task_3;
var
t, k, i: integer;
begin
write(‘T > ‘);
readln(t);
k := 1; i := 0;
while i < t do begin k := k * 2; i := i + 3 end; writeln('k=', k) end. T время K количество 3 2 6 4 9 8 12 16 24 48 4. program task_4; var n, i: integer; x, a, s: real; begin write('N, x > ‘);
readln(n, x);
s := 0;a := x;
for i := 1 to n do
begin
x := a * i;
s := s + sin(x)
end;
writeln(‘Sum=’, s:5:2 )
end.
0.16
5.
program task_5;
var
n, a, i, st: integer;
begin
write(‘Введи a и N через пробел > > ‘);
readln(a, n);
st := 1;
for i := 1 to n do
st := st * a;
writeln(a, ‘ в степени ‘, n, ‘ = ‘, st)
end.
2 уровень сложности
1. Начав тренировки, спортсмен в первый день пробежал 10 км. Каждый день он увеличивал дневную норму на 10% нормы предыдущего дня. Какой суммарный путь пробежит спортсмен за N дней? Протестировать программу для N=3 и N=7.
2. Составить программу, которая печатает таблицу умножения и таблицу сложения для числа N в десятичной системе счисления. Протестировать программу для чисел 6 и 9.
3. Составить программу, которая запрашивает пароль (четырёхзначное число) до тех пор, пока он не будет правильно введён. Протестировать программу.
4. Ежемесячная стипендия студента составляет A рублей в месяц, а расходы на проживание превышают стипендию и составляют B рублей в месяц. Рост цен ежемесячно увеличивает расходы на 3%. Составить программу расчёта необходимой суммы денег, которую надо единовременно попросить у родителей, чтобы можно было прожить учебный год (10 месяцев), используя только эти деньги и стипендию. Протестировать программу для следующих исходных данных:
а) A=1000, B=1100
б) A=900, B=1000
в) A=600, B=1200
5. Найти все делители натурального числа N. Протестировать программу для N=10, N=75, N=99, N=13.
6. Написать программу вычисления N! (факториал числа N). Факториал вычисляется по формуле:
N!=
Протестировать программу для N=0, N=2 N=4.
1.
program task_1;
var
n, i: integer;
l, a: real;
begin
write(‘Введи N > ‘);
readln(n);
a := 10; l := a;
for i := 2 to n do
begin
a := a * 1.1;
l := l + a
end;
writeln(l, ‘ километров пробежит за ‘, n, ‘ дней ‘)
end.
2.
program task_2;
var
n, i: integer;
begin
write(‘N > ‘);
readln(n);
for i := 1 to 10 do
writeln(n, ‘*’, i:2, ‘=’, n * i:3, n:6, ‘+’, i:2, ‘=’, n + i:3)
end.
3.
program task_3;
const
parol = 1234;
var
n, i: integer;
begin
write(‘Введи пароль (четырехзначное число > ‘);
readln(n);
repeat
writeln(‘Неправильно! Попробуй еще раз.’);
write(‘Введи пароль > ‘);
readln(n);
until n = parol;
writeln(‘Верно! Молодец!’)
end.
4.
program task_4;
var
a, i: integer;
b, s: real;
begin
write(‘Стипендия > ‘);
readln(a);
write(‘Расходы > ‘);
readln(b);
s := b;
for i := 2 to 10 do
begin
b := b * 1.03;
s := s + b
end;
writeln(‘Родительский взнос > ‘, (s — a * 10):6:2, ‘руб.’)
end.
5.
program task_5;
var
n, i: integer;
begin
write(‘N > ‘);
readln(n);
for i := 1 to n do
if n mod i = 0 then
write(i, ‘ ‘);
end.
6.
program task_6;
var
n, i, fac: integer;
begin
write(‘N > ‘);
readln(n);
if n = 0 then fac := 1
else
begin
fac := 1;
for i := 2 to n do
fac := fac * i
end;
writeln(‘Факториал ‘, n, ‘=’, fac);
end.
3 уровень сложности
1. Дано натуральное число N. Вычислить сумму ряда:
S=1!+2!+3!+…+N! (N > 1)
Протестировать программу для N=3 и N=5
2. Покупатель должен заплатить в кассу S рублей. У него имеются монеты в 1, 2 и 5 рублей, а также купюры достоинством в 10, 50, 100 и 500 рублей (достаточное количество). Сколько монет и купюр разного достоинства отдаст покупатель, если он начинает платить с самых крупных? Операции целочисленного деления (div и mod) использовать нельзя. Протестировать программу для S=567, S=1025, S=64, S=13.
3. Числа Фибоначчи (fn) определяются формулами:
f0=f1=1, fn=fn-1+fn-2 при n=2,3,…
Определить f10, f25, f40.
4. Вывести на экран все простые числа в диапазоне от 2 до N. Протестировать программу для N=100, N=300.
5. Даны натуральное N и действительное x. Вычислить сумму ряда:
sin x+sin x2+sin x3+…+sin xN
Протестировать программу для а) x=0.5, N=3, б) x=1, N=5. Проверить правильность её работы с помощью калькулятора.
6. Построить таблицу истинности для логического выражения (A OR B) AND C.
1.
program task_1;
var
n, i, fac, s, j: integer;
begin
write(‘N > ‘);
readln(n);
s := 0;
for i := 1 to n do
begin
fac := 1;
for j := 1 to i do
fac := fac * j;
//write(fac, ‘ ‘);
s := s + fac
end;
writeln(‘Сумма факториалов ‘, n, ‘=’, s);
end.
2.
program task_2;
var
s, k10, k50, k100, k500, m1, m2, m5: integer;
begin
write(‘S > ‘);
readln(s);
k10 := 0;k50 := 0;k100 := 0;
m1 := 0; m2 := 0;m5 := 0;
while s — 500 > =0 do
begin
k500 := k500 + 1;
s := s — 500
end;
while s — 100 > =0 do
begin
k100 := k100 + 1;
s := s — 100
end;
while s — 50 > =0 do
begin
k50 := k50 + 1;
s := s — 50
end;
while s — 10 > =0 do
begin
k10 := k10 + 1;
s := s — 10
end;
while s — 5 > = 0 do
begin
m5 := m5 + 1;
s := s — 5
end;
while s — 2 > =0 do
begin
m2 := m2 + 1;
s := s — 2
end;
m1 := s;
writeln(‘500 купюр ‘, k500, ‘ штук’);
writeln(‘100 купюр ‘, k100, ‘ штук’);
writeln(’50 купюр ‘, k50, ‘ штук’);
writeln(’10 купюр ‘, k10, ‘ штук’);
writeln(‘5 монет ‘, m5, ‘ штук’);
writeln(‘2 монет ‘, m2, ‘ штук’);
writeln(‘1 монет ‘, m1, ‘ штук’);
end.
3.
program task_3;
var
n, f, f1, f2: longint;
i: byte;
begin
write(‘Введи n > ‘);
readln(n);
if (n = 0) or (n = 1) then f := 1
else
begin
f1 := 1; f2 := 1;
for i := 2 to n do
begin
f := f1 + f2;
f1 := f2; f2 := f;
//write(f, ‘ ‘)
end;
end;
writeln(‘f’,n,’ =’,f)
end.
n f
10 89
25 121393
40 165580141
4.
program task_4;
var
n, i, j: integer;
f: boolean;
begin
writeln(‘n > ‘);
readln(n);
for i := 2 to n do
begin
f := true;
for j := 2 to i — 1 do
if i mod j = 0 then begin f := false; break end;
if f then write(i, ‘ ‘)
end;
end.
5.
program task_5;
var
n, i: integer;
x, a, s: real;
begin
write(‘N, x > ‘);
readln(n, x);
s := 0; a := x;
for i := 1 to n do
begin
s := s + sin(x);
x := x * a
end;
writeln(‘Sum=’, s:5:2)
end.
6.
program task_6;
var
a, b, c, f: boolean;
begin
writeln(‘A’:7, ‘B’:7, ‘C’:7, ‘F’:7);
for a := false to true do
for b := false to true do
for c := false to true do
begin
f := (a or b) and c;
write(a:7, b:7, c:7, f:7);
writeln
end;
end.
Практическое задание №25
Тема: Программирование циклов и ветвлений на Паскале.
Алгоритм Евклида
1 уровень сложности
1. Набрать и отладить программу нахождения наибольшего общего делителя и протестировать её на следующих исходных данных:
а) a=40 b=64
б) a=32 b=16
в) a=12 b=20
г) a=5 b=12
2. Составить на языке Паскаль программу, которая запрашивает с клавиатуры N целых чисел и считает, сколько из них положительных, сколько отрицательных и сколько нулей. Разработать для программы не менее двух тестов и доказать правильность её работы.
3. Написать программу, которая выводит на экран все двухзначные числа, делящиеся на 3 или на 5 (использовать операции целочисленного деления div или mod).
1.
program task_1;
var
M, N: integer;
begin
write(‘Введи M и N > > ‘);
readln(M, N);
while M < > N do
if M > N then M := M — N
else N := N — M;
writeln(‘НОД=’, M)
end.
2.
program task_2;
var
i, a, k1, k2, k0, n: integer;
begin
k1 := 0; k2 := 0;k0 := 0;
write(‘Введи количество чисел’);
readln(n);
for i := 1 to n do
begin
write(‘Введи число:’);
readln(a);
if a > 0 then k1 := k1 + 1
else if a < 0 then k2 := k2 + 1 else k0 := k0 + 1 end; writeln('Положительных > > ‘, k1, ‘ Отрицательных > > ‘, k2, ‘ Количество нулей > > ‘, k0)
end.
3.
program task_3;
var
i: integer;
begin
for i := 10 to 99 do
if (i mod 3 = 0) or (i mod 5 = 0) then write(i, ‘ ‘)
end.
2 уровень сложности
1. Составить программу нахождения наименьшего общего кратного (НОК) двух чисел m и n, используя формулу n*m=НОД(n,m)*НОК(n,m). Разработать тесты для проверки правильности работы программы.
2. Проверить, являются ли два числа a и b взаимно простыми. Два числа называются взаимно простыми, если их наибольший общий делитель равен 1. Протестировать программу для следующих исходных данных:
а) a=5 b=95
б) a=3 b=100
в) a=11 b=98
3. Написать программу сокращения дроби , где N – целое, M – натуральное число. Использовать алгоритм Евклида. Разработать тесты для проверки правильности работы программы.
1.
program task_1;
var
m, n, p, d: integer;
begin
write(‘Введи M, N > > ‘);
readln(m, n);
p := m * n;
while m < > n do //определение НОД
if m > n then m := m — n
else n := n — m;
d := m;//НОД
writeln(‘НОK =’, p div d)
end.
1) 10, 30
2) 40, 16
3) 15, 80
2.
program task_2;
var
a, b: integer;
begin
write(‘Введи a и b > > ‘);
readln(a, b);
while a < > b do
if a > b then a := a — b
else b := b — a;
if a = 1 then writeln(‘Числа взаимно простые’)
else writeln(‘Числа не взаимно простые’);
end.
3.
program task_3;
var
M, N, a, b, c: integer;
begin
write(‘Введи M и N > > ‘);
readln(M, N);
a := M; b := N;
while M < > N do
if M > N then M := M — N
else N := N — M;
c := M;
writeln(‘Сокращенная дробь > ‘, a / c, ‘/’, b / c)
end.
1) 5 15
2) 24 4
3) 21 43
3 уровень сложности
1. Составить на языке Паскаль программу нахождения наибольшего общего делителя трёх чисел, используя следующую формулу: НОД(a,b,c)=НОД(НОД(a,b),c). Протестировать программу на следующих исходных данных:
а) a=40 b=64 c=120
б) a=32 b=45 c=60
в) a=11 b=220 c=33
г) a=175 b=1025 c=600
2. Написать программу, запрашивающую с клавиатуры целые числа и определяющую максимальное и минимальное из них. Окончание ввода – число 0. Протестировать программу для последовательности: -3 5 6 -11 24 -1 0.
3. Составить программу для графического изображения делимости чисел от 1 до N (N – исходное данное). В каждой строке надо выводить число и столько плюсов, сколько делителей у этого числа. Например, если исходное данное число равно 4, то на экране должно быть выведено:
1+
2++
3++
4+++
1.
program task_1;
var
a, b, c, d: integer;
begin
write(‘Введи a, b, c > > ‘);
readln(a, b, c);
while a < > b do
if a > b then a := a — b
else b := b — a;
d := a;//НОД a, b
while d < > c do
if d > c then d := d — c
else c := c — d;
writeln(‘НОД =’, d)//НОД a, b, c
end.
2.
program task_2;
var
a, max, min: integer;
begin
write(‘Введи число > > ‘);
readln(a);
max := a; min := a;
while a < > 0 do
begin
if a > max then max := a;
if a < min then min := a; write('Введи число > > ‘);
readln(a);
end;
writeln(‘max=’, max, ‘ min=’, min)
end.
3.
program task_3;
var
n, j, i: integer;
begin
writeln(‘введите число’);
readln(n);
for i := 1 to n do
begin
write(i);
for j := 1 to n do
if (i mod j = 0) then
write(‘+’);
writeln;
end;
end.
ЕК ЦОР: Часть2, глава 6, §39. ЦОР № 16
Программа-конструктор

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

1. Сумма N произвольных целых чисел:

алг
нач
. цел n, s, a
. ввод n
. s:=0
. нц n раз
. . ввод a
. . s:=s+a
. кц
. вывод s
кон

2. Сумма ряда $$S=1+\frac12+\frac13+\dots+\frac1N$$:

алг
нач
. цел n, i
. вещ s
. ввод n
. s:=0; i:=0
. нц n раз
. . i:=i+1
. . s:=s+1/i
. кц
. вывод s
кон

Проверка: при $$N=1$$ получаем $$S=1$$; при $$N=2$$ — $$S=1+\frac12=1{,}5$$; при $$N=4$$ — $$S=1+\frac12+\frac13+\frac14\approx2{,}0833$$; при $$N=6$$ — $$S\approx2{,}45$$.

3. Амёба удваивается каждые 3 часа:

алг
нач
. цел t, n, i
. ввод t
. n:=1; i:=0
. нц пока i<t
. . n:=n*2
. . i:=i+3
. кц
. вывод n
кон

Тогда: через 3 часа — $$2$$, через 6 часов — $$4$$, через 9 часов — $$8$$, через 12 часов — $$16$$, через 24 часа — $$256$$.

4. Сумма $$\sin x+\sin 2x+\sin 3x+\dots+\sin Nx$$:

алг
нач
. цел n, i
. вещ x, a, s
. ввод n
. ввод x
. s:=0; a:=x; i:=0
. нц n раз
. . i:=i+1
. . x:=a*i
. . s:=s+sin(x)
. кц
. вывод s
кон

Для $$x=1{,}5$$ и $$N=3$$:

$$\sin 1{,}5+\sin 3+\sin 4{,}5\approx0{,}9975+0{,}1411-0{,}9775\approx0{,}1611$$

5. Нахождение $$a^N$$:

алг
нач
. цел n, a, st, i
. ввод n, a
. i:=0; st:=1
. нц n раз
. . i:=i+1
. . st:=st*a
. кц
. вывод st
кон

Проверка: $$3^4=81$$, $$2^5=32$$.

Ответ

1) Сумма введённых чисел находится по накоплению переменной $$s$$.
2) Для ряда $$1+\frac12+\frac13+\dots+\frac1N$$ используется цикл с прибавлением $$\frac1i$$.
3) Через 3, 6, 9, 12 и 24 часа будет соответственно $$2, 4, 8, 16, 256$$ амёб.
4) При $$x=1{,}5$$ и $$N=3$$ сумма равна примерно $$0{,}1611$$.
5) $$3^4=81$$, $$2^5=32$$.



Общая оценка
3.9 / 5
Другие учебники
Другие предметы