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

albertik2000 @albertik2000

August 2022 1 9 Report

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

Answers & Comments

HRAshton И почему все считают, что указывать языки - не царское дело?.. Ну ладно, вот на 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.

2 votes Thanks 3

Answers & Comments

kak budet po belorusski osenpo utram teper temno

dana smes gazov azotuglekislyj gazkislorodvodorod s odinakovymi massovymi

oksid tryohvalentnogo metalla soderzhit 70 metallaopredelit formolu oksidakak

pomogite kak sostavit etu programmu vychisleniya chisel kratnyh ne tolko 2 no i 3

pozhalujsta srochno pomogite s zadachej 5

najdite kolichestvo dvuznachnyh chisel kotorye delyatsya na summu svoih cifrpascal

рекомендуемые вопросы

Helpful Links

Helpful Social