Войти Регистрация Спроси ai-bota

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

Показать ответ

Ответ:

danila2003uly

13.08.2020 21:04

// 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

0,0(0 оценок)

Популярные вопросы: Информатика

Миша112236677777777

10.01.2020 20:12

Uses graphabc; begin var a, b, c: real; c : = 0; read(a); for b : = 1 / 1 downto 1 / a * 2 do begin if (b mod 2 = 0) then begin c : = c - b; end; if (b mod 2 = 1) then...

barina201720071

01.01.2020 17:59

Дано у- целое число. напишите условие проверки принадлежности данного числа промежутку[-3; 3). запишите результат, подобрав входное значение. ...

987helen

30.06.2021 23:03

Сколько есть натуральных чисел от 1 до 110,для которых верно утверждение: (последняя цифра числа четна и число кратно 3) или(число меньше 10)?...

Mucuo31

22.08.2020 23:59

1. чему равен арифметический порядок числа в десятичной системе счисления, если его внутреннее представление в формате с плавающей точкой – 45е18000?...

trushinaveronic

22.08.2020 23:59

Какой объем дисковой памяти в мегабайтах займут 5 минут стереозвука при параметрах оцифровки: частота дискретизации 22 кгц, квантование – 8 бит? какой объем дисковой...

1985alla

12.11.2020 22:46

1. на трех заводах «альфа», «плутон» и «рубин» иногда происходят аварии. разместить сведения о количестве аварий на рабочем листе. в диапазоне в7: d10 получить процент...

dfghngh

22.12.2021 18:41

Чему равно расстояние от точки d до прямой b...

VaYfL

22.12.2021 18:41

Найти значение производной функции f(x)=x^4\2+3x^3+x+11 в точке x0=-2...

Про228ooo

22.12.2021 18:41

В2 одинаковых стакана налили воду до одной высоты .когда в один из них погрузили стальной шарик,уровень воды поднялся до верхнего края.что произойдет,если в другой стакан...

egorivanov2000

22.01.2022 11:06

Что является отличительным признаком морали? 1) отражает представления о добре и зле 2) эмоционально воздействует на человека 3) объясняет природные и общественные явления...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку