Задача на нахождение наибольшего числа из трех

[назад]

Задача. Написать программу нахождения наибольшего целого числа из трех введенных с клавиатуры

Решение. Задача и по своей сути и по способу реализации простейшая, но даже при решении такой простой задачи есть свои нюансы. Дело в том, что получить желаемый результат можно несколькими способами. При выполнении такой простейшей задачи подойдет любой вариант.   Но как показала практика,  при усложнении задачи, когда требуется найти наибольшее из четырех чисел, у неподготовленных  учеников возникают ошибки. Предлагаю вариант решения, используя который ученики допускают наименьшее количество ошибок. Он сводится к следующему: после операции  сравнения наибольшее значение присваивается какой- либо  одной переменной (например "х"), которая и будет выведена в качестве результата решения задачи.

var

  x,y,z :integer;

begin

  writeln('Введите три целых числа');

  readln(x,y,z);

  if x < y then

    x:=y;

  if x < z then

    x := z;

  writeln('Наибольшее целое число = ',x);

  readln;

end.

[назад]