У деда мороза X яблок количество их трехзначное число. Определите, совпадает ли первая и последняя цифра в этом числе?
Задача На Pascale
Надо срочно решить!
Ответы
Ответ дал:
0
// PascalABC.NET 3.3, сборка 1600 от 23.12.2017
// Внимание! Если программа не работает, обновите версию!
begin
var x:=ReadInteger('Введите трехзначное число Х:');
if x div 100 = x mod 10 then Writeln('Цифры совпадают')
else Writeln('Цифры не совпадают')
end.
Примеры
Введите трехзначное число Х: 452
Цифры не совпадают
Введите трехзначное число Х: 242
Цифры совпадают
// Внимание! Если программа не работает, обновите версию!
begin
var x:=ReadInteger('Введите трехзначное число Х:');
if x div 100 = x mod 10 then Writeln('Цифры совпадают')
else Writeln('Цифры не совпадают')
end.
Примеры
Введите трехзначное число Х: 452
Цифры не совпадают
Введите трехзначное число Х: 242
Цифры совпадают
Ответ дал:
0
Program n1;
var x : integer;
begin
readln(x);
if(x mod 10=x div 100) then write('совпадает') else write('не совпадает');
end.
var x : integer;
begin
readln(x);
if(x mod 10=x div 100) then write('совпадает') else write('не совпадает');
end.
Вас заинтересует
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад