Решение задачи Series 29

#include <stdio.h>
int main(void)
{
    int k,n;
    printf("K:");
    scanf("%i", &k);
 
    printf("N:");
    scanf("%i", &n);
 
    int ki,ni, a,s=0;
    for (ki=1; ki<=k; ++ki){
        for (ni=1; ni<=n; ++ni){
            printf("%i:%i>",ki,ni);
            scanf("%i", &a);
            s+=a;
        }
    }
    printf("%i\n",s);
    return 0;
}

import random

N = random.randrange(1,7)
K = random.randrange(1,7)

print("N = ",N)
print("K = ",K)
S = 0
for i in range(0,K):
    for j in range(0,N):
        x = random.randrange(0,4)
        print(x,end="; ")
        S += x
    print()

print()
print("Sum = ",S)
									

program Series29;
var
  K,N,Ni,Ki,A,S:Integer;
begin
 
 Write('Введите кол-во элементов в наборе N: ');
 Readln(N);
 
 Write('Введите кол-во наборовK: ');
 Readln(K);
 
 S:=0;
 for Ki:=1 to K do
  for Ni:=1 to N do
   begin
     write('Введите ',Ni,' элемент из ',Ki ,' набора :');
     Readln(A);
     S:=S+A;
   end;
 
 writeln('Сумма элементов равна: ',S);
end.