Увеличением массы со скоростью пренебрёг (как и ещё много чем), извините за дерзость
var
m, a, F: real;
begin
writeln('Введіть дані про тілі:');
write('-Маса: '); readln(m);
write('-Прискорення: '); readln(a);
F := m * a;
writeln('--------------');
writeln('Pівнодійної сил: ', F, ' H');
end.