• Помогите пожалуйста очень очень срочно нужно Написать программу в Паскаль r=(max(min(x,y),z))/3

Ответы 3

  • Спасибо вам большое!
  • пожалуйста
  • var  r,x,y,z,min,max:real;begin  Write('Введите x,y,z: '); Read(x,y,z);  if x<y then min:=x else min:=y;  if z>min then max:=z else max:=min;  r:=max/3;  Writeln('r=',r)end.Тестовое решение:Введите x,y,z: 18.4 9.62 10.7r=3.56666666666667
  • Добавить свой ответ

Войти через Google

или

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

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

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