var 
  x: integer;
  a: real;

begin
  x := 2;
  write(x); {Выведет на экран значение переменной x}
  write('x= ', x); 
  writeln(x); {Выведет на экран значение переменной x и перейдет на следующую строку}
  writeln('x= ', x);

  a := 0.15;
  writeln(a);
  writeln(a * x);
  writeln(a * x:4:1);
end.