Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/6: Рейтинг темы: голосов - 6, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 13.12.2013
Сообщений: 39
1

Определить является ли заданное четырехзначное число перевертышем. Например 1234 и 4321

19.05.2015, 05:19. Просмотров 1067. Ответов 2
Метки нет (Все метки)


Определить является ли заданное четырехзначное число перевертышем. Например 1234 и 4321
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
19.05.2015, 05:19
Ответы с готовыми решениями:

Определить, является ли заданное четырехзначное число перевертышем
Определить является ли заданное четырехзначное число перевертышем(Например 1234 и 4321)

Определить, является ли введенное четырехзначное число палиндромом
Delphi( vsl from aplliction). Как реализовать данную задачу? Определить, является ли введенное...

Определить, является ли заданное шестизначное число счастливым
Определить, является ли заданное шестизначное число счастливым. (Счастливым называют такое...

Определить, является ли заданное число чётным трехзначным числом
Помогите пожалуйста решить задачи с алгоритмами. Разветвляющий алгоритм. 1.Определить, является...

2
26 / 26 / 24
Регистрация: 08.07.2013
Сообщений: 125
19.05.2015, 07:21 2
Лучший ответ Сообщение было отмечено nastya210171 как решение

Решение

Если разрешат, то так проще всего:
Delphi
1
2
3
4
5
6
7
8
var s: string;
    n: integer;
...
s := IntToStr(n);
if s = ReverseString(s) then
  ShowMessage('Перевертыш')
else
  ShowMessage('Не перевертыш');
0
22 / 22 / 50
Регистрация: 18.05.2015
Сообщений: 89
19.05.2015, 12:36 3
А если без системных вызовов, то:
Delphi
1
2
3
4
5
6
7
8
var s:integer;
     n:integer;
...
s:=IntToStr(n);
if (s[1]=s[4]) and (s[2]=s[3])
then ShowMessage('Перевертыш')
else
  ShowMessage('Не перевертыш');
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.05.2015, 12:36

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Ввести число N. Вывести число, получаемое выписыванием в обратном порядке цифр числа N.(например, 1234, результат 4321).
Ввести число N. Вывести число, получаемое выписыванием в обратном порядке цифр числа N. ...

Дано натуральное четырехзначное число n. Определить, является ли это число перевертышем
Дано натуральное четырехзначное число n. Определить, является ли это число перевертышем. Например,...

Определить, является ли заданное четырехзначное число счастливым
Четырехзначное число называют счастливым если сумма первых двух его цифр равна сумме двух последних...

Определить, является ли заданное четырехзначное число палиндромом
помогите пжлста составить программу на Ассемблере для решения следующей задачи: Определить,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.