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

Задание 5 Вариант 1 Самостоятельная работа 5 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)

Задача

program s5_v1_5;
const
n = 20;
var
a: array[1..n] of integer;
i, s5, s4, s3, s, k5, k4, k3: integer;
sr, pr: real;
begin
writeln(‘Ввод массива’);
randomize;
for i := 1 to n do
begin
a[i] := random(5) + 1;
write(a[i], ‘ ‘)
end;
s := 0; s5 := 0; s4 := 0; s3 := 0;
for i := 1 to n do
begin
s := s + a[i];
case a[i] of
5: begin s5 := s5 + a[i]; k5 := k5 + 1 end;
4: begin s4 := s4 + a[i]; k4 := k4 + 1 end;
3: begin s3 := s3 + a[i]; k3 := k3 + 1 end;
end;
end;
writeln;
sr := s / n; pr := 100 * (k5 + k4 + k3) / n;
writeln(‘Средний балл=’, sr:2:2, ‘ Процент успеваемости=’, pr:2:2, ‘%’)
end.
Результат: средний бал – 3.60, процент успеваемости – 80.00%

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

В программе создаётся массив из 20 оценок. Затем по всем элементам массива вычисляются:

  • сумма всех оценок $$s$$;
  • количество оценок $$5$$, $$4$$ и $$3$$;
  • средний балл $$sr = \frac{s}{n}$$;
  • процент успеваемости $$pr = \frac{k5 + k4 + k3}{n} \cdot 100\%$$.

По приведённому результату получаем:

$$sr = 3{,}60$$

$$pr = 80{,}00\%$$

program s5_v1_5;
const
  n = 20;
var
  a: array[1..n] of integer;
  i, s5, s4, s3, s, k5, k4, k3: integer;
  sr, pr: real;
begin
  writeln(‘Ввод массива’);
  randomize;
  for i := 1 to n do
  begin
    a[i] := random(5) + 1;
    write(a[i], ‘ ‘)
  end;
  s := 0; s5 := 0; s4 := 0; s3 := 0;
  for i := 1 to n do
  begin
    s := s + a[i];
    case a[i] of
      5: begin s5 := s5 + a[i]; k5 := k5 + 1 end;
      4: begin s4 := s4 + a[i]; k4 := k4 + 1 end;
      3: begin s3 := s3 + a[i]; k3 := k3 + 1 end;
    end;
  end;
  writeln;
  sr := s / n;
  pr := 100 * (k5 + k4 + k3) / n;
  writeln(‘Средний балл=’, sr:2:2, ‘ Процент успеваемости=’, pr:2:2, ‘%’)
end.

Ответ: средний балл — 3,60; процент успеваемости — 80,00%.



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