Дано целое четырехзначное число N.Если первая цифра числа больше, чем последняя, то увеличить число в 2 раза иначе увеличить число в 10.

Потому что Ваше решение не является ответом на данный вопрос, а отмечен нарушением, потому что в данном случае это спам. Если человек, просит решение на на паскале, то будьте добры давать ответ на языке программирования, который он изучает. А если в дальнейшем, Вы будете отвечать, как Вы выразились "Неа. Писать на Паскале - зашквар", Ваши решения будут так же отмечены нарушениями.

Всё правильно, если бы он просил в задании написать на Паскале, я бы или написал, или не лез сюда.

Он ничего про язык не сказал. Потому спам тут лишь твоё кукареканье.

Впечатлен Вашим уровнем воспитания.

Я рад.

П0 1 0 / {x} 1 0 * ИП0 1 0 0 0 / [x] - x<0 22 ИП0 2 * С/П 1 0 * С/П