В городке проходит чемпионат по футболу меж школьными командами. В конец

В городе проходит чемпионат по футболу меж школьными командами. В конец вышли две команды от школы номер 42 и от школы номер 13. Конец состоит из 2-ух матчей счёт которых складывается. Если команды забили однообразное число голов, то победителем становится та команда, которая забила больше мячей на чужом поле. Если и так фаворита не найти, объявляется ничья.
Известно, что 1-ый матч команды сыграли на поле школы 42. nbsp;Коля желает узнать сколько существует исходов второго матча, что в итоге кубок достанется одной из команд. Он представил, что число голов хоть какой из команд в каждом матче не превысит девяти.
Формат входного файла
Во входном файле записан итог первого матча в формате a:b, где a количество голов, забитых командой школы 42 и b количество голов, забитых командой школы 13.
Формат выходного файла
Выведите два числа количество исходов, при которых победит команда школы 42 и количество исходов, при которых одолеет команда школы 13.

Задать свой вопрос
1 ответ
В этой задачке довольно перебрать все вероятные финалы второго матча (счёт первой команды от 0 до 9 и счёт 2-ой команды от 0 до 9). Для каждого возможного финала нужно сопоставить сумму голов и, если она совпадает, голы на чужом поле.
var
nbsp;nbsp;s: string;
nbsp;nbsp;a, b, i, j, ra, rb: integer;
begin
nbsp;nbsp;assign(input, input.txt);
nbsp;nbsp;reset(input);
nbsp;nbsp;assign(output, output.txt);
nbsp;nbsp;rewrite(output);
nbsp;nbsp;readln(s);
nbsp;nbsp;a:=ord(s[1]) - ord(0);
nbsp;nbsp;b:=ord(s[3]) - ord(0);
nbsp;nbsp;for i:=0 to 9 do
nbsp;nbsp;nbsp;nbsp;for j:=0 to 9 do
nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;if a + i gt; b + j then
nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;inc(ra)
nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;else if a + i lt; b + j then
nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;inc(rb)
nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;else if i gt; b then
nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;inc(ra)
nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;else if i lt; b then
nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;inc(rb);
nbsp;nbsp;writeln(ra, , rb);
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт