Начерти координатную плоскость и ставь точки, а потом соедени их.
Смотри первая координата это 7,5 по X и 5 по Y, смотрим вторую координату это -4 по X и 7 по Y. Когда все точки отметишь соедени их и получишь рисунок
Var a,b,c:real;
begin
writeln ('Введите стороны треугольника');
read (a,b,c);
if ((a + b) > c) and ((a + c) > b) and ((b + c) > a) then writeln ('Существует')
else writeln ('Не существует');
end.
Простой математический расчёт- 110000
ближайшее большее число(но не меньшее, т.к. сообщение тогда не поместится), равное степени двойки(2,4,8,16,32,64,128,256....) это 256. 256-это два в восьмой степени. значит номер каждого спортсмена весит 8 бит. 8*120(половина спортсменов)=960 бит
или 8 бит-1 байт, тогда ответ 120 байт(те же 960 бит)