За какую сборную выступал футболист, чье имя зашифровано на этом рисунке?

 На одну чашу весов ставим 200-граммовую гирю и пересыпаем в чаши весь песок так, чтобы установилось равновесие; в результате на чаше с гирей будет 4,4 кг песка, а на другой – 4,6 кг; 
затем  4,6 кг пересыпаем в пакет, а 4,4 кг делим пополам – по 2,2 кг; 2,2 кг с одной чаши пересыпаем в пакет к 4,6 (получается там 6,8 кг); 2,2 кг с другой чаши пересыпаем в пустой пакет; 
Далее на одну чашу ставим 200-граммовую гирю и из пакета с 2,2 кг начинаем отсыпать 200 г песка; полученные 200 г высыпаем в пакет к 6,8 кг.
и получается мы взвесили три раза и получилось 7 кг и 2 кг

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 var   a, b, c, x, y, z: integer;   Summa1, Summa2: integer; begin   write('Яблоки(руб/кг): ');   readln(a);   write('Груши(руб/кг): ');   readln(b);   write('Апельсины(руб/кг): ');   readln(c);   writeln;   writeln('Понедельник: ');   write('Продано кг яблок: ');   readln(x);   write('Продано кг груш: ');   readln(y);   write('Продано кг апельсинов: ');   readln(z);   Summa1:=x*a+y*b+z*c;   writeln;   writeln('Вторник: ');   write('Продано кг яблок: ');   readln(x);   write('Продано кг груш: ');   readln(y);   write('Продано кг апельсинов: ');   readln(z);   Summa2:=x*a+y*b+z*c;   writeln;   writeln('Понедельник: ', Summa1, ' руб; Вторник: ', Summa2, ' руб'); end.