Вопрос, который вызвал трудности

Пользователь вводит целое число. если оно является четным и при этом не находиться между 10 и 20, то вывести на экран его квадрат. в противном случае напечатать исходное число

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

Готово........................

Var
n:Integer;
Begin
 Read(n);
 if (n mod 2=0) and (n<10) or (n>20) then Writeln(n*n);
end.