Напишисат программу которая вычисляет y=3x

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

begin
  Writeln('y=',3*ReadReal('x='))
end.

Примеры
x= 15
y=45

x= 3.18
y=9.54

x= -17.32423
y=-51.97269