Требуется заполнить массив a[1: 6, 1: 6] из целых чисел по правилу a(k, n)= k^n. а) изобразите блок-схемой алгоритм, позволяющий заполнить массив нужным образом. б) напишите на изучаемом вами языке программирования программу, реализирующую предложенный вами алгоритм.
var a:array [1..6,1..6] of integer;
k,n,s,st:integer;
begin
for k:=1 to 6 do
begin
for n:=1 to 6 do
begin
st:=1;
for s:=1 to n do st:=st*k;
a[k,n]:=st;
write(a[k,n]:7);
end;
writeln
end
end.