
Мова програмування лазарус ! Серед учнів школи проводилося тестування з трьох предметів, по кожному
з яких учні отримали певну кількість балів (цілі числа). Напишіть програму, яку можуть використати учні для обчислення їхнього середнього балу трьох тестів і виведення середнього значення.

Ответы на вопрос

Ответ:
Объяснение:
Вот пример программы на языке программирования Lazarus, которая вычисляет средний балл по трем тестам, представленным в виде целых чисел, и выводит результат на экран:
pascal
Copy code
program AverageScore;
var
score1, score2, score3: integer; // переменные для хранения баллов
average: real; // переменная для хранения среднего балла
begin
writeln('Введите баллы за первый тест: ');
readln(score1);
writeln('Введите баллы за второй тест: ');
readln(score2);
writeln('Введите баллы за третий тест: ');
readln(score3);
average := (score1 + score2 + score3) / 3.0; // вычисляем средний балл
writeln('Средний балл по трем тестам: ', average:0:2); // выводим результат
end.
Пользователь вводит баллы за каждый тест, программа вычисляет среднее значение и выводит его на экран с точностью до двух знаков после запятой.



Ось приклад коду на мові програмування Lazarus, який дозволяє обчислити середній бал з трьох тестів:
pascalprogram SeredniyBal; var bal1, bal2, bal3: Integer; seredniy: Real; begin WriteLn('Введіть бали за перший тест:'); ReadLn(bal1); WriteLn('Введіть бали за другий тест:'); ReadLn(bal2); WriteLn('Введіть бали за третій тест:'); ReadLn(bal3); seredniy := (bal1 + bal2 + bal3) / 3; WriteLn('Середній бал:', seredniy:0:2); end.
У цьому прикладі ми використовуємо змінні bal1
, bal2
і bal3
для збереження балів, які користувач вводить. Змінна seredniy
використовується для обчислення середнього балу, де (bal1 + bal2 + bal3)
- сума всіх балів, а / 3
- ділення на кількість тестів.
На останньому рядку використовується WriteLn
, щоб вивести обчислений середній бал на екрані з точністю до двох знаків після коми (seredniy:0:2
).
Цей код дозволяє учням ввести бали за три тести і обчислити їх середній бал.


Топ вопросов за вчера в категории Информатика








Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili