Что выполняет следующий код на языке pascal.
Что то выполняет... Скажи какой именно код, и я сразу скажу!