1 2 3 4 5 6 7 8 9 | PRINT "vvedite razmery poverhnosti:" INPUT "dlinnaya storona=", a INPUT "korotkaya storona=", b PRINT "vvedite razmery pryamougolnika:" INPUT "dlinnaya storona=", c INPUT "korotkaya storona=", d kol1 = (a \ c) * (b \ d) kol2 = (a \ d) * (b \ c) IF kol1 > kol2 THEN PRINT "dlinnaya vdol dlinnoy, kol-vo= "; kol1 ELSE PRINT "korotkaya vdol dlinnoy, kol-vo="; kol2 |