• QBasic. Помогите, пожалуйста! . Программа запрашивает названия двух футбольных команд, количество забитых голов каждой из команд в первом и ответном матче и выводит название команды-победителя и общий счет. Победитель определяется по сумме двух матчей. Считается, что первый матч проходит на поле команды 1, ответный – на поле команды 2. В случае, когда результат по сумме двух матчей ничейный (например, 2:0 и 1:3 = 3:3 по сумме двух матчей), победителем становится команда, забившая больше мячей на поле соперника (либо назначается дополнительное время, если таковой нет, например 2:0 и 0:2).

Ответы 1

  • DIM Nazv1$, Nazv2$DIM P1%,O1%,D1%,P2%,O2%,D2%CLSINPUT "Nazvanie 1: ", Nazv1$INPUT "Perviy: ", P1INPUT "Otvetniy: ", O1INPUT "Nazvanie 2: ", Nazv2$INPUT "Perviy: ", P2INPUT "Otvetniy: ", O2IF P1+O1>P2+O2 THEN   PRINT Nazv1$ELSE   IF P1+O1<P2+O2 THEN      PRINT Nazv2$   ELSE      IF O1-O2>P2-P1 THEN         PRINT Nazv1$      ELSE         IF O1-O2<P2-P1 THEN            PRINT Nazv2$         ELSE            PRINT "Dopolnitelnoe:"            PRINT Nazv1$            INPUT D1            PRINT Nazv2$            INPUT D2            IF D1>D2 THEN               PRINT Nazv1$            ELSE               IF D1<D2 THEN                  PRINT Nazv2$               ELSE                  PRINT "Nichia"               END IF            END IF         END IF      END IF   END IFEND IFENDПример:Nazvanie 1: APerviy: 2Otvetniy: 0Nazvanie 2: BPerviy: 0Otvetniy: 2Dopolnitelnoe:A? 3B? 3Nichia
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years