Variant 9. 8) convert roman record numbers to arab and arabian to the roman: l. mmmcclviii 2. cdiii 3. 1001 4. 941 2) solve the equation: х7 + 100435 = 4bc16 где 7, 5, 16 – the basic number system. 3) convert decimal numbers to a specified number system: 1. 230110  2. 57910  3. 1564,2210  14 4) convert numbers to decimal number system from specified: 1. cef16  3. 10342,245  2. 330034  4. 765,7218  5) convert numbers from one number system to another: 1. 544416  2. 23457  6) solve the equation: 323х = 4217 where x and 7 –the basic number system. find x. 7) work out the action: 1. 22213 + 22123 3. 542,657 + 154,567 5. 3425 · 2345 2. 27439 – 15879 4. 26816 – laa16 6. 521,328 – 1101,112

Var   i: integer;     begin for i: =1 to 9 do  write(i);     writeln(10); for i: =0 to 8 do  write(i);     writeln(9); for i: =1 to 2 do  write('0');     for i: =1 to 7 do  write(i);     writeln('8'); for i: =1 to 3 do  write('0');     for i: =1 to 6 do  write(i);     writeln('7'); for i: =1 to 4 do  write('0');     for i: =1 to 5 do  write(i);     writeln('6'); for i: =1 to 5 do  write('0');     for i: =1 to 4 do  write(i);     writeln(5); for i: =1 to 6 do  write('0');     for i: =1 to 3 do    write(i);     writeln('4'); for i: =1 to 7 do  write('0');     for i: =1 to 2 do  write(i);     writeln(3); for i: =1 to 8 do  write('0');     write('1'); writeln('2'); for i: =1 to 9 do  write('0');     writeln(1);     end. как сделать более кратко не знаю. но эта программа работает.