• Завтра экзамен!!Помогите пожалуйста составить программу!!
    !Используя функцию или процедуру вычислить среднее арифметическое чисел X , Y, Z

Ответы 5

  • Мне надо и с функцией и с процедурой!
  • В условии к вашему заданию это нигде не написано!Написано "Используя функцию или процедуру", т.е. либо функция, либо процедура!
  • но вы и не то и не это не использовали.
  • подправил через процедуру)
    • Автор:

      myleekh7v
    • 6 лет назад
    • 0
  • Var x,y,z,c:real;Procedure P(x,y,z:real; Var c:real);Beginc:=(x+y+z)/3;End;Beginwrite('Введите x,y,z: ');readln(x,y,z);P(x,y,z,c);writeln('Среднее арифметическое = ',c);End.
    • Автор:

      nancy4xmv
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years