Условие
Дано число N. Найдите значение 2N.

В задаче запрещено использовать арифметические операции +, -, *, / и %, а также операторы if / switch и тернарную операцию.

Формат входных данных
В одной строке вводится одно целое число N (0 ⩽ N ⩽ 30).

Формат выходных данных
Требуется вывести одно целое число ­— 2N.

входные данные
3
выходные данные
8

михаил - футбол,велоспорт.

николай - теннис, волейбол.

михаил - баскетбол, плавание.

решение: так как михаил не увликаеться  велоспортом, волейболом  и тенисом значет он занимаеться плаванием. тогда получаеться что тенисист - николай и потому как он самый старший то павел будет велосипедистом из этого выходит что волейболистом будет николай.

в египетском письме было более 750 иероглифов, не было гласных. иероглифы обозначали целые слоги и звуки.

138 байт,потому что 1024 бита=128 байт=> 10+128=138 как-то так.

1)

var

i,k: integer;

a: array [1..14] of integer;

begin

k: =0;

for i: =1 to 14 do

begin

a[i]: =random(46)-15;

write(a[i]: 3);

if a[i] mod 2=0 then k: =i;

end;

if k> 0 then

begin

for i: =k to 13 do a[i]: =a[i]+1;

a[14]: =0;

end;

writeln;

for i: =1 to 14 do write(a[i]: 3);

end.

2)

var

i,k: integer;

a: array [1..14] of integer;

begin

for i: =1 to 14 do

begin

a[i]: =random(46)-15;

write(a[i]: 3);

end;

for i: =1 to 7 do

begin

k: =a[i];

a[i]: =a[i+7];

a[i+7]: =k;

end;

writeln;

for i: =1 to 14 do write(a[i]: 3);

end.