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

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

Задача

Запишите на языке Паскаль программы решения задач № 3, 4, 6, 7 из § 3.6. Используйте оператор while.

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

Программы на языке Pascal с использованием оператора 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(‘Введи x ‘);
  readln(x);
  while n < x do
  begin
    n := n * 2;
    t := t + 3
  end;
  writeln(‘Через’, t, ‘ минут будет ‘, x, ‘ амеб’)
end.



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