Яку роботу здійснив чоловік який тримав груз масою 15кг на протязі 30хв в руках.

program evg97; uses crt; var  a,b,c: real; begin  writeln('++');   writeln('|                            порівнялка                            |');   writeln('++');   write('введіть число a: '); readln(a);   write('введите число b: '); readln(b);   write('введіть число c: '); readln(c);   writeln();   writeln('++');   writeln('|                            результат:                             |');   writeln('++');   if (a=b) or (a=c) or (b=c) then          writeln('|   деякі (або всі) числа рівні |')      else          if (a< b) and (b< c) then                   writeln('|        число посередині: b=',b: 8: 3,'            |')              else                        if (a< c) and (c< b) then                             writeln('|        число посередині: c=',c: 8: 3,'            |')                      else                           writeln('|        число посередині: a=',a: 8: 3,'            |');   writeln('++'); end.