Ребят, срочно!! Нужно ввести пять целых чисел и найти максимальное из них. В Паскале,...

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

Ребят, срочно!! Нужно ввести пять целых чисел и найти максимальное из них. В Паскале, используя оператор "if then else". Как поняла, необходимо расписать все задание, уже видела здесь решение через n, это не подходит. Буду благодарна тому, кто решит


Информатика (175 баллов) | 220 просмотров
0

а там получилось всё?

Дан 1 ответ
0 голосов
Правильный ответ

Program abc
var a,b,c,d,e,max:real;
Begin
Writeln ('Введите пять целых которые нужно сровнять между собой');
readln (a,b,c,d,e);
if a>b then max:=a else max:=b;
if c>max then max:=c;
if d>max then max:=d;
if e>max then max:=e;
Writeln ('Наибольшее число ',max);
End.

(124 баллов)
0

Пять целых, а используешь real) Лучше int64 взять.

0

Спасибо огромное! :)

0

кому как

0

TheLightDashing, я паскалем особо не увлекался, всё внимание на Javascript

0

ТаирSa, real-число двойной точности с плавающей запятой. Int64 это 64-битовое число со знаком.  В int64 влезет больше, чем в real. Real стоит использовать тогда, когда тебе дроби нужны (1,5; 2,5; и т.д.)