Составьте программу нахождения максимального из 4 чисел a, b, c, d

Пример ввода:

2 5 7 1

Пример вывода:

Большее из чисел равно 7

Question

Информатика

Юлия

19 сентября, 23:05

Составьте программу нахождения максимального из 4 чисел a, b, c, d

Пример ввода:

2 5 7 1

Пример вывода:

Большее из чисел равно 7

+3

Ответы (1)

Знаете ответ на вопрос?

Епифаний · Answer 1

Program naibolwee;

var a, b, c, d, max1, max2:real;

begin

Readln (a, b, c, d) ;

if a>b then max1:=a else max1:=b;

if c>d then max2:=c else max2:=d;

if max1>max2 then Writeln ('Наибольшее число=', max1) else Writeln ('Наибольшее число равно=', max2)

end.

Составьте программу нахождения максимального из 4 чисел a, b, c, dПример ввода:2 5 7 1Пример вывода:Большее из чисел равно 7

Составьте программу нахождения максимального из 4 чисел a, b, c, d

Пример ввода:

2 5 7 1

Пример вывода:

Большее из чисел равно 7