Где ошибка? Является ли заданное натуральное четырехзначное число палиндромом?Палиндромами называются числа, которые читаются одинаково
5-9 класс
|
слева-направо и справа-налево.
Напрмер, 8998, 3333.
Вводится целое число N (999 < N <10 000).
Вывести слово YES, если N является палиндромом и NO, если нет.
Предпоследняя строка. Перед ('NO'); должно быть write или writeln.
Var
N, a, b, c, d: Integer;
begin
Writeln('Vvedite chislo');
ReadLn(N);
a:=N mod 10;
b:=N mod 100 div 10;
c:=N mod 1000 div 100;
d:=N div 1000;
if (a=d) and (b=c) then write ('YES')
else writeln('NO');
end.
Другие вопросы из категории
1)школьник читает текст в учебнике; 2)бабушка читает письмо;3)мальчик просыпается от звонка будильника;4)разговаривают подруги Таня и Лена,
Читайте также
таким,которое читается одинаково слева направо и справа налево(например:23132).
а)Определите количество знаков в числе;
б)Определите четность числа;
в)Выведите описание числа,например,"нечетное однозначное число","четное двухзначное число" и тд.
Пример ввода: 347
Пример вывода: Нечетное трехзначное число
а) определите количество знаков в числе;
б) определите чётность числа;
в) выведите описание числа ,наприме нечётное одназначное число чётное двухзначное число
№20. Даны величины углов треугольника. Определить является ли это треугольник:
а) остроугольным
б) тупоугольным
в) прямоугольным
г) равносторонним
д) равнобедренным.
№21. Определить, какая из двух точек - M1(x1,y1) или M2(x2,y2) - расположена ближе к началу координат. Вывести на экран дисплея координаты этой точки.
№22. Даны действительные числа a, b, c, x, y. Выяснить, пройдет ли кирпич с ребрами a,b,c в прямоугольное отверстие со сторонами x и y. Просовывать кирпич в отверстие разрешается только так, чтобы каждое из его ребер было параллельно или перпендикулярно каждой из сторон отверстия.
№23. Написать программу, которая печатает True или False в зависимости от того, выполняются или нет заданные условия:
а) квадрат заданного трехзначного числа равен кубу суммы цифр этого числа;
б) сумма двух первых цифр заданного четырехзначного числа равна сумме двух его последних цифр;
в) среди цифр заданного трехзначного числа есть одинаковые;
г) среди первых трех цифр из дробной части заданного положительного вещественного числа есть цифра 0.
может превосходить число сотен). Если не является, то вывести ближайшее следующее число-палиндром.