Правила форума
Прочтите прежде чем задавать вопрос!
Очень нужна ваша помощь!
По условию задачи нужно построить квадрат Пифагора (таблицу Пифагора) в 12-ричной с/с.
Ну с самой таблицей я разобрался, а вот как заставить программу считать "123456789ABC" ума не приложу...
Может кто сталкивался с подобной задачей? Как реализовать даную функцию?
Сам код пока выглядит так:
Program Pifagor;
Var
pif : array [1..12, 1..12] of Integer;
i , j : Integer;
Begin
for i:=1 to 12 do
for j:=1 to 12 do
pif[i,j]:=i*j;
for i:=1 to 12 do begin
for j:=1 to 12 do
write (pif[i,j],' ');
writeln;
end;
readln;
End.
