begin
var n := ReadInteger();
var a := MatrGen(n, n, (i, j)-> (2 shl i) * Ord(j >= i));
a.Println;
end.
можна отримувати гарны оцынки, здобувапти знання!
А) двигатель, руль, колесо, дверь, окна и т.д.
б)материнская плата, корпус, разъёмы , дисковод и т.д.
в)кабинеты, доски, парты, стулья и т.д.
г) генерал, лейтенант, взвод, рота и т.д.
д)республики, области, правительство и т.д.
Потому что компьютер принимает всю информацию в формате 0 и 1, вся информация в компьютере, это нечто такое: 00011011001 01010101 010100 10 010 000 0 0 10101010 101 01111 111 0 01010 и тд. А это двоичная система счисления (в ней используется 2 символа 0 и 1)
Можно заменить на
read(x1,y2,x3,x4);