Составить метод 3х чисел Найти среднее арефмичиское !!!!!! Срочно !!! Прошу!!!

Составить метод 3х чисел
Отыскать среднее арефмичиское !!!!!! Безотлагательно !!! Прошу!!!

Задать свой вопрос
1 ответ
Var a,b,c,sred_A:real;

begin

Writeln('Привет,я-alconafft');

Writeln('Введи первое число');

readln(a);

Writeln('Введи 2-ое число');

readln(b);

Writeln('Введи третье число');

readln(c);

sred_A:=a+b+c/3;

writeln('среднее арифметические равно ',sred_A);

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


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

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

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

Войти на сайт