Страницы 191-195 параграф 4 4 вопрос / задание 5, ГДЗ по информатике за 8 класс к учебнику Босовой просвещение
Страницы 191-195 §4.4 номер 5


№3
program Z_5_3_5;
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
program Z_5_4_5;
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
program Z_5_6_5;
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
program Z_5_7_5;
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.