zhoramalushevpegkpk

Ответ:

var m,u:real;

begin

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

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

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

end.

Пояснение:

Функция .Sqr для числа возвращает его квадрат