Вопрос, который вызвал трудности
Напишите программу, которая выбирает максимальное и минимальное из пяти введённых чисел.
Входные данные
Входная строка содержит 5 целых чисел, разделённых пробелами.
Выходные данные
В первой строке нужно вывести минимальное из введённых чисел, во второй строке – максимальное.
Примеры
входные данные
1 2 3 4 5
выходные данные
1
5
На паскале
Ответ экспертов Учись.Ru
Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.
После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:
Var a,b,c,d,e,max,min:integer;
begin
writeln('a, b, c, d, e:');
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;
if aif cif dif ewriteln(min);
writeln(max);
end.
Пример:
a, b, c, d, e:
1 2 3 4 5
1
5