Question

Мова програмування лазарус ! Серед учнів школи проводилося тестування з трьох предметів, по кожному з яких учні отримали певну кількість балів (цілі числа). Напишіть програму, яку можуть використати учні для обчислення їхнього середнього балу трьох тестів і виведення середнього значення. Окрім того, необхідно передбачити виведення повідомлення «Вітаємо! Чудовий результат!»!, якщо середній бал більший ніж 95.срочно!!!!!!!​

Answer 1

Ответ:

program AverageScore;

var

Score1, Score2, Score3: Integer;

Average: Real;

begin

WriteLn('Введіть бали за три предмети:');

ReadLn(Score1, Score2, Score3);

Average := (Score1 + Score2 + Score3) / 3;

WriteLn('Середній бал: ', Average:0:2);

if Average > 95 then

WriteLn('Вітаємо! Чудовий результат!');

end.

Объяснение:

Если вам понравился мой ответ, сделайте его лучшим ответом! ;)