Форум программистов, компьютерный форум, киберфорум
Наши страницы
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
Sarumanovich
0 / 0 / 0
Регистрация: 17.12.2012
Сообщений: 23
1

Задача без условного оператора

20.05.2013, 22:10. Просмотров 1071. Ответов 1
Метки нет (Все метки)

3.4. Целочисленная арифметика. Если четырехзначное число, введенное с клавиатуры, является симметричным (например 1331,0550), то вывести 1, в противном случае - любое другое число.
Уже неделю не могу решить эту задачу.
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
20.05.2013, 22:10
Ответы с готовыми решениями:

Из условного оператора в оператор присваивания
В одной из лаб в универе есть пару заданий: Не могу догадаться как нужно...

как решить без условного оператора???
Известны данные о росте 15 юношей класса, упорядоченные по убыванию. Нет ни...

Решение уравнений и неравенств с использованием условного оператора
Определить, имеется ли среди трех чисел a, b и с хотя бы одна пара взаимно...

Решение уравнений и неравенств с использованием условного оператора
Напишите код пожалуйста очень нужно

Вывести на экран чисела от 1 до 100 с использованием условного оператора if...then..else
Напишіть програму, яка надрукує на екрані цілі числа від 1 до 100 в рядок через...

1
Puporev
Модератор
55465 / 42572 / 29422
Регистрация: 18.05.2008
Сообщений: 100,714
21.05.2013, 08:40 2
Лучший ответ Сообщение было отмечено Sarumanovich как решение

Решение

Можно так.
Pascal
1
2
3
4
5
6
7
8
9
10
11
var n:integer;
    f:boolean;
begin
repeat
write('Введите четырехзначное число n=');
readln(n);
until(n>999)and(n<10000);
f:=(n div 1000=n mod 10)and(n div 100 mod 10=n div 10 mod 10);
write(ord(f));
readln
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
21.05.2013, 08:40

Записать указанное действие и виде одного условного оператора переменной х присвоить корень уравнения
Записать указанное действие и виде одного условного оператора переменной х...

Как сделать задержку окна программы без оператора readln в конце?
Как сделать задержку окна программы без оператора readln в конце?Раньше писал...

Задача на файлы. Вычислить учеников без двоек
Даны текстовые файлы с оценками по 13 предметам, списком студентов, вычислить...


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

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

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