Задать вопрос Регистрация
Помочь другим

  • Определить максимальное и минимальное из трех вещественных чисел, вводимых с клавиатуры.

Ответы 1

  • program project1777;uses  math,  Classes ; var   x,y,z:integer;   begin       writeln('vedite 1 chislo');readln(x);     writeln('vedite 2 chislo');readln(y);     writeln('vedite 3 chislo');readln(z);     begin     if ((x>y) and (x>z)) then     writeln('samoe bolshoe chislo ',x)     else     if ((y>x) and (y>z)) then     writeln('samoe bolshoe chislo ',y)     else     if ((z>x) and (z>y)) then    writeln('samoe bolshoe chislo ',z);     end;     begin      if ((x<y) and (x<z)) then     writeln('samoe malenkoe chislo ',x)     else     if ((y<x) and (y<z)) then     writeln('samoe malenkoe chislo ',y)     else     if ((z<x) and (z<y)) then     writeln('samoe malenkoe chislo ',z);     end;   readln;   end.

    • Автор:

      ripley
    • 5 лет назад
    • 0

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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