Язык Pascal: Разветвляющийся алгоритм

Составить алгоритм решения задачи для определения максимального значения из двух различных вещественных чисел.

Question

Дросида

23 апреля, 06:06

+4

Ответы (1)

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

Гортензия · Answer 1

Var

a, b, max:real;

begin

Read (a, b) ;

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

Writeln ('Максимальное: ', max)

end.

Язык Pascal: Разветвляющийся алгоритмСоставить алгоритм решения задачи для определения максимального значения из двух различных вещественных чисел.