Мова програмування лазарус ! Серед учнів школи проводилося тестування з трьох предметів, по кожному з яких учні отримали певну кількість балів (цілі числа). Напишіть програму, яку можуть використати учні для обчислення їхнього середнього балу трьох тестів і виведення середнього значення. Окрім того, необхідно передбачити виведення повідомлення «Вітаємо! Чудовий результат!»!, якщо середній бал більший ніж 95.срочно!!!!!!!
More Questions From This User See All
Answers & Comments
Ответ:
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.
Объяснение:
Если вам понравился мой ответ, сделайте его лучшим ответом! ;)