Дорогие пикабушники, прошу вашей помощи, не могу справиться с паскалем...