9 lines
190 B
ObjectPascal
9 lines
190 B
ObjectPascal
// Демонстрация операции shl
|
|
begin
|
|
Writeln('Степени двойки');
|
|
Writeln(' n 2^n');
|
|
for var i:=0 to 30 do
|
|
Writeln(i:2,(1 shl i):12);
|
|
end.
|
|
|