Решение задач Pascal и C++