Напишите дружественную пользовательскую программу, в которой:..(Pascal) Напишите дружественную пользовательскую программу, в которой:
-пользователь вводит три целых числа до ста
-на экран выводится среднее арифметическое введёных чисел с двумя знаками после запятой

Предыдущий
вопрос Следующий
вопрос

Программа на Pascal:

program AverageCalculator
va
num1, num2, num3: integer
average: real
begi
writeln('Введите три целых числа до ста:')
write('Первое число: ')
readln(num1)
write('Второе число: ')
readln(num2)
write('Третье число: ')
readln(num3)
average := (num1 + num2 + num3) / 3
writeln('Среднее арифметическое введенных чисел: ', format('%0.2f', [average]))
end.

Пользователь может вводить три целых числа до 100, а затем программа вычислит среднее арифметическое этих чисел и выведет результат с двумя знаками после запятой.