<span>k:=pos(' ',s); - позиция пробела
</span><span>t:=Copy(s,k+1,3); - копирование с 6 символа + 3(как-то так)
</span>Ответ: зим<span />
var
i, n, a: integer;
c1, c2, c3, c4: integer;
Да хренас два вам ее кто - нибудь решит! Мы уже второй день решаем вашу задачу. Мой кот умер от голода, потому что я задумался над этой задачей слишком сильно. Меня откачивали 16 часов, после того как я упал в обморок из за голода, ибо я тоже не кушал с того момента как услышал условие этой задачи. Даже когда я проснулся в больнице, я все равно начал рассказывать соседям по палате об этой задаче. Решения нет. желания нет. Боли тоже нет.
<span>1) 122(16) вот это число</span>