Вывести на экран степени двойки (Паскаль)

Вывести на экран степени двойки (Паскаль)
Гость
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.1, сборка 1201 от 18.03.2016 begin   var n:=ReadInteger('n=');   var r:BigInteger:=1;   for var i:=1 to n do begin     r*=2; Writeln(i,' - ',r)     end end. Тестовое решение: n= 50 1 - 2 2 - 4 3 - 8 4 - 16 5 - 32 6 - 64 7 - 128 8 - 256 9 - 512 10 - 1024 11 - 2048 12 - 4096 13 - 8192 14 - 16384 15 - 32768 16 - 65536 17 - 131072 18 - 262144 19 - 524288 20 - 1048576 21 - 2097152 22 - 4194304 23 - 8388608 24 - 16777216 25 - 33554432 26 - 67108864 27 - 134217728 28 - 268435456 29 - 536870912 30 - 1073741824 31 - 2147483648 32 - 4294967296 33 - 8589934592 34 - 17179869184 35 - 34359738368 36 - 68719476736 37 - 137438953472 38 - 274877906944 39 - 549755813888 40 - 1099511627776 41 - 2199023255552 42 - 4398046511104 43 - 8796093022208 44 - 17592186044416 45 - 35184372088832 46 - 70368744177664 47 - 140737488355328 48 - 281474976710656 49 - 562949953421312 50 - 1125899906842624
Не нашли ответ?
Ответить на вопрос
Похожие вопросы