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

begin

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

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

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

end.​

diant020502    3   11.12.2020 15:05    3