Ввести четырехзначное целое число и определить яявляется ли число перевертышем( такими например являются числа 6666 и 3223).

И почему все считают, что указывать языки - не царское дело?.. Ну ладно, вот на PascalABC.NET:

var
  n: integer;

begin
  readln(n);
  writeln((n mod 10) * 1000 + (n div 10 mod 10) * 100 + (n div 100 mod 10) * 10 + (n div 1000) * 1 = n ? Yes : No);
end.