Нужна помощь
ТРАКТОРИСТ ЗА 7 ЧАСОВ ВСПАХАЛ 4,9 ГЕКТАР. КАКОВА БЫЛА СКОРОСТЬ ТРАКТОРА ЕСЛИ ШИРИНА ПОЛОСЫ ВСПАХИВАЕМОГО ПЛУГА РАВНА 1,75 М.
По дате
По рейтингу
(:4,9 ГА: 1, 75м ):7 =
(:4,9 ГА: 1, 75м ) - ЭТО ПОЛУЧИТСЯ СУММАРНАЯ ДЛИНА его пути
делишь на 7- скорость - м в час
function factorial(x:integer):integer;
begin
if (x=1) then factorial:=1;
if x>1 then factorial:= factorial(x-1)*x;
end;
procedure TForm1.Button1Click(Sender: TObject);
var i, t : integer;
begin
memo1.Lines.Clear;
t:=strtoint(Edit1.text);
Memo1.Lines.Add(inttostr(factorial(t)))
end;
переведи гектары в метры и реши
