Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/7: Рейтинг темы: голосов - 7, средняя оценка - 5.00
2 / 0 / 0
Регистрация: 28.09.2013
Сообщений: 13

Древняя легенда про создателя шахмат, и одновременно Треш

10.02.2014, 18:24. Показов 1386. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Легенда такова: Однажды Знатный король, увлёкся шахматами, и сказал: приведите мне того мудреца, который придумал это чудо, и я сделаю все, что он скажет.
Его слуги нашли его, и привели к королю.
Король спросил мудреца: что мне сделать для тебя?
на что мудрец ответил: возьми шахматную доску, положи в 1 квадрат 1 зёрнышко, а во второе в 2 раза больше. и так во все клетки доски.
и теперь сама задача (треш)
нужно подсчитать сколько всего в сумме будет зёрнышек (сумма членов геометрической прогрессии) и поместить их все в вагоны. при условии что 1 зернышко весит 0,0001 кг, вместимость 1 вагона =60 Т, длинна 1 вагона 10м. нужно подсчитать сколько раз если скрепить все вагоны вместе, они обогнут землю. экватор 41000 км.
Заранее благодарен всем.
P/S. если для кого-то эта задача не есть треш, то это его личное мнение. Возможно я Петросян.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
10.02.2014, 18:24
Ответы с готовыми решениями:

Легенда про try catch
Правда ли, что при использовании try catch, код выполняется дважды (1ый раз типа создает новый "фоновый" поток и там делает все...

Задача про шахмат паскаль
задада про шахмат где 1,1 белая 12 черная

Небеса: Игра или треш?
Совсем недавно на одном игровом портале наткнулся на обычную браузерку в стиле фэнтези. Заманило меня на официальный сайт своими красивыми...

3
908 / 756 / 833
Регистрация: 06.09.2013
Сообщений: 1,561
10.02.2014, 20:59
264 - 1 - количество зерен,
(264 - 1)*0.0001*0.001 ≈ 264 / 107 - вес зерен в тоннах,
264 / (60 * 107) – количество вагонов для всех зерен,
264 * 10 / (60 * 107) – длина вагонов в метрах
264 * 10 / (60 * 107 * 41 * 106) = 1064lg2 – 13 – lg41 – lg6 = 103.87498… = 7498,676… - нужное количество
1
2 / 0 / 0
Регистрация: 28.09.2013
Сообщений: 13
10.02.2014, 21:33  [ТС]
Цитата Сообщение от erl27 Посмотреть сообщение
264 - 1 - количество зерен,
(264 - 1)*0.0001*0.001 ≈ 264 / 107 - вес зерен в тоннах,
264 / (60 * 107) – количество вагонов для всех зерен,
264 * 10 / (60 * 107) – длина вагонов в метрах
264 * 10 / (60 * 107 * 41 * 106) = 1064lg2 – 13 – lg41 – lg6 = 103.87498… = 7498,676… - нужное количество
спасибо, но я по своей глупости не написал то, что это нужно реализовать в среде pascal, что вполне логично, раз я пишу в разделе паскаля. но за ответ спасибо.
0
908 / 756 / 833
Регистрация: 06.09.2013
Сообщений: 1,561
10.02.2014, 22:19
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  Count, a: real;
  i: byte;
 
begin
  a := 1;
  Count := 0;
  for i := 1 to 64 do begin
    Count := Count + a;
    a := a * 2
  end;
  Count := Count * 1E-7 * 10 / (60 * 41 * 1E6);
  writeln('Результат: ', Count:0:0)
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
10.02.2014, 22:19
Помогаю со студенческими работами здесь

Полный треш с блокировками от акцеса 2010
Создал в sql server таблицу, суть такова, что когда пользователь ставит чекбокс (истина или ложь), то в эту таблицу заносятся данные этого...

При работе на компе, устанавливаются треш программы
Скачал активатор Windows...) Ну и пробнул установить. Так я думал, что если будешь что-то плохое, то я исправлю, там, из автозагрузки...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа
Maks 26.03.2026
Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .
Команды формы и диалоговое окно
Maks 26.03.2026
1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при создании или изменении элементов справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода!
anaschu 24.03.2026
Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
Midnight Chicago Blues
kumehtar 24.03.2026
Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru