Бейсик.) на узкой улице заклинило тормоза у «волги». шофер грузовика предложил убрать «волгу» с проезжей части дороги, оттащив ее на обочину с троса. составить алгоритм ответа на вопрос: «удастся ли оттащить «волгу»?

Волгу не удастся оттащить так как тормоза заклинили то  есть она едет

Sub aaa()       rows.clear       dim n as integer, k as integer, i as integer       n = cint(inputbox("n="))       k = 2 * n - 1       redim y(1 to k) as integer       randomize timer       for i = 1 to k               y(i) = int(rnd * 100 - 50)       next i       dim ry as range       set ry = range(cells(2, 2), cells(2, k + 1))       ry = y       redim x(1 to n) as integer       dim rx as range       set rx = range(cells(3, 2), cells(3, n + 1))       for i = 1 to n               x(i) = y(2 * i - 1) ^ 2       next i       rx = x       cells(2, 1) = "y"       cells(3, 1) = "x"       set ry = range(cells(2, 1), cells(2, k + 1))       set rx = range(cells(3, 1), cells(3, n + 1)) end sub

Program p1; var a,b: integer; begin writeln ('введите 2 числа'); readln (a,b); if a=b then writeln ('числа одинаковые') else if a> b then begin writeln ('наибольшее число ',a); writeln ('наименьшее число ',b); end else begin writeln ('наибольшее число ',b); writeln ('наиментшее число 10 ',a); end; end. program p2; var a,b,c,d: integer; begin writeln ('введите 4 числа'); readln (a,b,c,d); if a< b then a: =b; if c< d then c: =d; if a< c then a: =c; writeln ('наибольшее число ',a); end. program p3; var a,b,v: integer; begin writeln ('введите возрасты людей: '); write ('антона - '); readln (a); write ('бориса - '); readln (b); write ('виктора - '); readln (v); if (a=b) and (a=v) then writeln ('все люди одного возраста'); if (a=b) and (a> v) then writeln ('антон и борис старше виктора'); if (a=b) and (a< v) then writeln ('виктор старше всех') else if (v> a) and (v> b) then writeln ('виктор старше всех'); if (b=v) and (b> a) then writeln ('борис и виктор старше антона'); if (b=v) and (b< a) then writeln ('антон старше всех') else if (a> v) and (a> b) then writeln ('антон старше всех'); if (a=v) and (a> b) then writeln ('антон и виктор старше бориса'); if (a=v) and (a< b) then writeln ('борис старше всех') else if (b> v) and (b> a) then writeln ('борис старше всех'); end.