ввести три числа и отыскать большее их них 4 15 9

ввести три числа и найти большее их них 4 15 9

Задать свой вопрос
1 ответ
Program; var a,b,c,max:real; begin writeln(Введите 3 числа: ); readln(a,b,c); if (agt;b) and (agt;c) then max:=a else if b
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт