Var n:integer;
begin
write('n = ');
readln(n);
writeln('цифры числа:');
writeln(n div 10);
writeln(n mod 10);
end.
Пример:
n = 38
цифры числа:
3
8
1) не двухмерный, а двумерный
2) на каком языке писать?
<em>// PascalABC.NET 3.2, сборка 1353 от 27.11.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ReadlnString('>').ToWords.Println
end.
<u>Пример</u>
> Это строка с лишними пробелами
Это строка с лишними пробелами
24л 13л 11л 5л - емкость бочек
далее пойдут количества воды в каждой из бочек после каждого перливания
0 13 11 0
0 13 6 5
6 13 0 5
6 13 5 0
6 8 5 5
0 8 11 5
8 0 11 5
8 11 0 5
8 13 3 0
8 8 3 5
<u>8 8 8 0</u>