Программирование с ABCPASCAL Пользователь вводит массу и скорость. Программа вычисляет Кинетическую энергию и выводит на экран.​

var m,u:real;

begin

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

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

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

end.

Пояснение:

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