// Исправьте ошибку компиляции. Не всегда надо "верить" тексту ошибки

var k: real;

begin
  k := 2,5;
  Writeln(r);
end.