Задание 5 Параграф 4.5 ГДЗ Босова 8 класс 2023 (Информатика)
Решение #1



Рассмотрим вариант решения задания из учебника Босова, Босова 8 класс, Бином:
5. Запишите на языке Паскаль программы решения задач № 3, 4, 6, 7 из § 3.6. Используйте оператор while.
№3
var
n: integer;
a, b, c: real;
begin
n := 0;
write('Начальный запас рыбы, годовой план, наименьший запас > > ');
readln(a, b, c);
while c < = a do
begin
a := a + a * 0.15 - b;
n := n + 1
end;
writeln(n, ' лет')
end.
№4
var
a, d, n, s: integer;
begin
n := 0; s := 0;
a := 5; d := 4;
while s < = 324 do
begin
s := s + a;
a := a + d;
n := n + 1
end;
writeln(n, ' слагаемых')
end.
№6
var
k: integer;
n: real;
begin
n := 1000; k := 0;
while n < = 2000 do
begin
n := n + 0.05 * n;
k := k + 1
end;
writeln('Через', k, ' лет сумма вклада удвоится')
end.
№7
var
n, x, t: integer;
begin
n := 1; t := 0;
write('Введи х ');
readln(x);
while n < x do
begin
n := n * 2;
t := t + 3
end;
writeln('Через', t, ' минут будет ', x, ' амеб')
end.
Похожие решебники
Популярные решебники 8 класс Все решебники
*размещая тексты в комментариях ниже, вы автоматически соглашаетесь с пользовательским соглашением