// Исправьте ошибку компиляции. Не всегда надо "верить" тексту ошибки
var k: real;
begin
k := 2,5;
Writeln(r);
end.
