Программирование. Помогите пж!!!! Язык Pascal. Даны стороны треугольника. Найти его...

Question

Программирование. Помогите пж!!!! Язык Pascal.
Даны стороны треугольника. Найти его периметр.
Дано время в секундах. Вывести на экран запись времени в часах.
M килограмм конфет стоят N рублей. Сколько стоит 1 кг конфет? Сколько конфет можно купить на К рублей?

Answer 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.