Максимум из 3-х чиселДаны 3 целых различных числа. Нужно определить, которое из них самое...

0 голосов
64 просмотров

Максимум из
3-х чисел



Даны 3 целых различных числа.
Нужно определить, которое
из них самое большое.





Input

Со стандартного устройства ввода
вводится через пробел 3 целых числа, не превосходящих по модулю 10000.




Output

Нужно выдать на стандартное
устройство вывода через пробел ответ в следующем формате:


“First number is maximal”


“Second number is maximal”
“Third number is maximal”




Sample
Input

1234
4321 -432




Sample Output

Second number is maximal


Информатика (27 баллов) | 64 просмотров
Дан 1 ответ
0 голосов

Написано на Pascal:

Program Max;
Var a, b, c: Integer;
Begin
Read(a);
Read(b);
Read(c);
If (abs(a) >10000) Or (abs(b) > 10000) Or (abs(c) > 10000) Then
WriteLn('Error!')
Else
Begin
If(a>b) Then
Begin
If(a > c) Then
WriteLn('First number is maximal')
Else
WriteLn('Third number is maximal')
End
Else If(b > c) Then
WriteLn('Second number is maximal')
Else
WriteLn('Third number is maximal');
End;
ReadLn;
End.

(2.8k баллов)