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

  • Написать программу , в паскале, для нахождения наименьшего и наибольшего из трех чисел с помощью процедур

Ответы 1

  • Program Pr1;uses crt;var a,b,c,max,min:integer;beginclrscr;readln(a,b,c);if a>b then max:=aelse max:=b;if c>max then max:=c;writeln('max ',max);if a<b then min:=aelse min:=b;if c<min then min:=c;writeln('min ',min);end.

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

Еще вопросы

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

Войти через Google

 или

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

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

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