Найти значение U по формуле: U=max(x,y.z)+min(x,y,z)

Найти значение U по формуле: U=max(x,y.z)+min(x,y,z)
-------------------------------
x+y-z
Составить программку в паскале

Задать свой вопрос
1 ответ
Program z1;  Var x,y,z,max,min,u:integer;Begin  write('Введите x  =  ');  readln(x);  write('Введите y =  ');  readln(y);  write('Введите z =  ');  readln(z);  if (xgt;y) then if (xgt;z) then max:=x                         else max:=z           else if (ygt;z) then max:=y                         else max:=z;  if (xlt;y) then if (xlt;z) then min:=x                         else min:=z           else if (ylt;z) then min:=y                         else min:=z;  u:=max+min;  writeln('U = ',u)End.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт