ПЗ1 / 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.