Программирование. язык pascal. даны стороны треугольника. найти его периметр. дано время в секундах. вывести на экран запись времени в часах. m килограмм конфет стоят n рублей. сколько стоит 1 кг конфет? сколько конфет можно купить на к рублей?

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  // про треугольник
  var a,b,c:real;
  Read(a,b,c); Writeln(a+b+c);
 
  // про время
  var t:=ReadInteger('Время в секундах равно');
  Writeln('Это составляет ',t/3600,' час.');
 
  // про конфеты
  var m:=ReadReal('M=');
  var n:=ReadReal('N=');
  var k:=ReadReal('K=');
  var p:=n/m;
  Writeln('Стоимость 1 кг конфет, руб.: ',p);
  Writeln('На ',k,' руб. можно купить ',k/p:0:3,' кг. конфет')
end.