841
Подставляем вместо и - 0 к - 1 р - 2 а - 3
Записываем АКИРИ, как 31020 в четверичной и переводим в десятичную, получаем 840, т.к. первая позиция 00000(иииии) была единицей, прибавляем 1
Получаем 841
Procedure Number(number:integer);
var len,i :integer;
str :string ;
begin
str := intToStr(number);
len := length(str);
for i:= 1 to len do
writeln(str[i]);
<span> end;</span>
Нарушение правил техники безопасности может привести к большим сложностям и проблемам.
В частности, угроза жизни человека, поломка и неисправность техники