zadach191.BAS

{* Задача191 *}

REM basic

' Ввести 3 числа x1, x2, x3. Найти их среднее арифметическое.
' Результат вывести с комментарием "Среднее арифметическое равно".


CLS

INPUT "Введите x1, x2, x3 ", x1, x2, x3
sr = (x1 + x2 + x3) / 3
PRINT "Среднее арифметическое равно "; sr

End