Решите задачу пожалуйста Паскаль
Бандиты Гарри и Ларри отдыхали на природе. Решив пострелять, они выставили на бревно несколько банок из-под пива (не больше 10). Гарри начал простреливать банки по порядку, начиная с самой левой, Ларри — с самой правой. В какой-то момент получилось так, что они одновременно прострелили одну и ту же последнюю банку.
Гарри возмутился и сказал, что Ларри должен ему кучу денег за то, что тот лишил его удовольствия прострелить несколько банок. В ответ Ларри сказал, что Гарри должен ему еще больше денег по тем же причинам. Они стали спорить кто кому сколько должен, но никто из них не помнил сколько банок было в начале, а искать простреленные банки по всей округе было неохота. Каждый из них помнили только, сколько банок прострелил он сам.
Определите по этим данным, сколько банок не прострелил Гарри и сколько банок не прострелил Ларри.
Входные данные. В единственной строке входного файла INPUT.TXT записано 2 числа — количество банок, простреленных Гарри и Ларри соответственно.
Выходные данные. В файл OUTPUT.TXT выведите 2 числа — количество банок, не простреленных Гарри и Ларри соответственно.

Пример
№INPUT.TXTOUTPUT.TXT
4 7 6 3

  • Карты, деньги, 2 ствола - и вся эта бодяга только для того, чтобы из 10 вычесть 2 числа? Сильно.

    var f1,f2:text;
    a,b:integer;
    begin
    Assign(f1,'INPUT.TXT');
    Assign(f2,'OUTPUT.TXT');
    reset(f1);
    rewrite(f2);
    readln(f1,a,b);
    writeln(f2,10-a, 10-b);
    close(f1);
    close(f2);
    end.

  • То есть ваша олимпиадная задача заключается в том, чтобы прочитать 2 тчисла и вывести их обратно, отняв 1?
  • Очевидно, Гарри не прострелил банки, простреленные Ларри, за исключением одной. Значит, он не прострелил b-1 банку. Ларри, аналогично, a-1 банку. Соответственно у Юриуса надо слегка подправить, заменив 10-a, 10-b на b-1, a-1 :)
    Кстати, сколько там банок они выставили "(не больше 10)" не важнее, чем их имена ;)

Вас заинтересует