Программирование я тут ошибку допустил, исправьте:
var m,u:real;

begin

write('Введите массу тела (кг): '); readln(m);

write('Введите скорость тела (м/c): '); readln(u);

write('Кинетическая энергия тела = ',(m*u.Sqr)/2,' Дж');

end.​

var m,u:real;

begin

write('Введите массу тела (кг): '); readln(m);

write('Введите скорость тела (м/c): '); readln(u);

write('Кинетическая энергия тела = ',(m*u.Sqr)/2,' Дж');

end.

Объяснение:

В конце после end. стоял невидимый символ