2 в n-ной степени на Delphi

[Murman_men]

Всем доброго времени суток.Требуется написать прогу, которая бы вычисляла 2 в n-ной степени, работать надо на Delphi, в консольном режиме, без всяких там процедур,маленькая поправочка, для n от 100 и выше.....

[Serge_Bliznykov]

гуглите по длинная арифметика

[Lokos]

a:=2;
for i:=0 to n-1 do
   a:=a*2;

по моему так

[Serge_Bliznykov]

Lokos, какого типа у Вас переменная a, чтобы обеспечить условие "для n от 100 и выше" ?

(напоминаю, что согласно online калькулятору,
2^100 = 1267650600228229401496703205376
2^200 = 16069380442589902755419620923411626 02522202993782792835301376 )
p.s. я не проверял)

[Utkin]

без всяких там процедур

Кто дал Вам такое идиотское задание? Скажите своему преподу, что это дурдом. 2 в 100 можно решить двумя способами либо через строки, либо через динамические массивы байтов. В любом случае программу весьма желательно разбивать на процедуры и функции. Препод очевидно объелся Бейсика...

[Serge_Bliznykov]

Сообщение от Utkin

Кто дал Вам такое идиотское задание?

Utkin, не горячитесь.. я не удивлюсь, если фразу про процедуры уже добавил сам TC (не, ну без всяких процедур реально же проще!! )

[Utkin]

Utkin, не горячитесь..

Все равно кто-то из них объелся .

[Alex11223]

Судя по этой теме http://programmersforum.ru/showthread.php?t=170201 — объелся только автор. Точнее видимо посчитал это задание легче и решил сделать его без "всяких там процедур".

[Utkin]

По той теме (так как смежная):

что всё-таки происходит с числом, когда оно выходит за размеры типа данных??

А ничего с ним не происходит. Это абстракция и она существует только в наших воспаленных мозгах . Программа же может поступить двумя способами:
а) Вылетит с ошибкой
б) Просто начнет считать заново. Например, получили для Byte 257, в результате переменная будет равна 1.

[Murman_men]

Всё))....я сделал)).....всем спасибо за внимание)).......и, кстати, это задание действительно проще, чем N! и спокойно пишется без процедур......а вот над N! надо ещё подумать.....