Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/6: Рейтинг темы: голосов - 6, средняя оценка - 4.50
phantomass
0 / 0 / 0
Регистрация: 22.12.2012
Сообщений: 1
1

Решение задач на тему числовые ребусы

25.12.2012, 21:53. Просмотров 1126. Ответов 1
Метки нет (Все метки)

Помогите пожалуйста решить числовой ребус через паскаль!
Аист*4=стая.
Помогите если кто может!)
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.12.2012, 21:53
Ответы с готовыми решениями:

числовые ребусы в Pascal
Доброго вечера! Есть несколько числовых ребусов: УДАР + УДАР = ДРАКА ...

Паскаль - решить числовые ребусы
Доброго вечера! Есть несколько числовых ребусов: КОРОВА + ТРАВА + ДОЯРКА =...

Не получается вычислить уровннение на Тему : Числовые массивы
Дан массив действительных чисел, содержащий n элементов. Определить количество...

Решение задач
http://www.cyberforum.ru/attachment.php?attachmentid=5407&d=1245233777...

Решение задач
как решить: 1-Напишите программу, которая по введенному числу N (1<N<10)...

1
КонецСвета
Почетный модератор
7929 / 3900 / 2464
Регистрация: 30.10.2011
Сообщений: 5,379
25.12.2012, 23:25 2
Лучший ответ Сообщение было отмечено как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
uses crt;
var a,i,s,t,ya: byte;
 
begin
for a:=1 to 2 do
    for i:=0 to 9 do
        for s:=1 to 9 do
            for t:=0 to 9 do
                for ya:=0 to 9 do
if (((a*1000)+(i*100)+(s*10)+t)*4=(s*1000)+(t*100)+(a*10)+ya)
   and (a<>i) and (a<>s) and (a<>t) and (a<>ya)
   and (i<>s) and (i<>t) and (i<>ya)
   and (s<>t) and (s<>ya)
   and (t<>ya)
   then
   writeln(a,i,s,t,'*4=',s,t,a,ya);
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
25.12.2012, 23:25

Решение задач.
http://s005.***********/i210/1001/a1/5f1f28bfcbe7.jpg...

Решение задач.
Народ помогите решить задачки! Завтра экзамен, а без них нет допуска! ХЕЛП ПЛИЗ!

Решение задач.
1)Ввести число.Определить сумму цифр во второй половине числа.(с использованием...


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

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

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