дано натуральное четырехзначное число, верно ли, что число ...

Question

дано натуральное четырехзначное число, верно ли, что число ...

Дмитрий

дано натуральное четырехзначное число, верно ли, что число начинается и заканчивается одной цифрой?

Есть ответ

18.12.2022

455

Ответ

Answer 1 · 18.12.2022

var a: integer;

begin

writeln('Введите четырехзначное число');

readln(a);

if a div 1000=(((a mod 1000) mod 100) mod 10) then writeln('Верно') else writeln('Не верно');

end.

дано натуральное четырехзначное число, верно ли, что число ...

дано натуральное четырехзначное число, верно ли, что число начинается и заканчивается одной цифрой?

Ответ

var a: integer; begin writeln('Введите четырехзначное число'); readln(a); if a div 1000=(((a mod 1000) mod 100) mod 10) then writeln('Верно') else writeln('Не верно'); end.

var a: integer;

begin

writeln('Введите четырехзначное число');

readln(a);

if a div 1000=(((a mod 1000) mod 100) mod 10) then writeln('Верно') else writeln('Не верно');

end.