
Bulhala
6 год назад
Помогите пожалуйста!
1)С клавиатуры вводится произвольное число N , с помощью деления div или mod определите , является ли оно двухзначным.
2)С клавиатуры вводится четырехзначное число X , определите является ли данное число палиндромом.
ОТВЕТЫ

Лаврентий
Jul 7, 2019
1) program n_1;
var n: integer;
begin
readln (n);
if n div 100 = 0 then
writeln (Число двузначное) else writeln (Число не является двузначным)
end.
var n: integer;
begin
readln (n);
if n div 100 = 0 then
writeln (Число двузначное) else writeln (Число не является двузначным)
end.
264
Смежные вопросы: