ПЗ в формате txt / z2

//2) Составьте программу вычисления механической работы,
//когда тело равномерно движется под действием приложенной к нему силы,
//пользуясь формулой A = FS, где F – приложенная сила, а S – пройденный путь (вводит пользователь).

var
A, F, S: integer;

begin

readln(F); //ручной ввод пользователя
readln(S);

writeln('F = ', F, ', S = ', S);

A:= F*S; // расчёт по формуле

writeln('используя формулу А = F*S получим результат А = ', A); // вывод результата


end.