ПОМОГИТЕ ПАСКАЛЬПри подмоги ФУНКЦИИ найти среднее арифметическое трех чисел.

ПОМОГИТЕ ПАСКАЛЬ
При помощи ФУНКЦИИ найти среднее арифметическое трех чисел.

Задать свой вопрос
Пичугин Юрик
каких чисел?
Хатрусов Тоха
всех, вводятся с клавиатуры
1 ответ

program summa;

function sum(a,b,c : real): real;

var

 s:real;

begin

 s:=(a+b+c)/3;

 sum:=s;

end;

var

 x,y,z : real;

begin

 writeln('Введите числа');

 read(x, y, z);

 writeln('Среднее арифметическое: ',sum(x,y,z));

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт