Ответы и объяснения

Лучший Ответ!
  • Tlalok
  • почетный грамотей
2013-04-07T06:59:16+00:00

var

  a, b, c:real;

begin

  write('Введите путь пройденный за первую десятидневку '); readln(a);

  write('Введите путь пройденный за вторую десятидневку '); readln(b);

  write('Введите путь пройденный за третью десятидневку '); readln(c);

  if a > b then

     if a > c then

       writeln('Наибольший путь пройден за первую десятидневку ')

     else

       writeln('Наибольший путь пройден за третью десятидневку ')

  else

      if b > c then

        writeln('Наибольший путь пройден за вторую десятидневку ')

      else

        writeln('Наибольший путь пройден за третью десятидневку ');

end.