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

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

import random

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

print("K = ",K)
print("N = ",N)

for i in range(0,K):
    s = 0
    check = False
    for j in range(0,N):
        x = random.randrange(0,4)
        print(x,end="; ")
        s += x
        if x == 2:
            check = True
    print()
    print("Sum = ",end="")
    if check:
        print(s)
    else:
        print(0)
    print()
									

program Series34;
var
  K,N,Ni,Ki,A,Sum:Integer;
  Check:boolean;
begin
 Write('N: ');
 Readln(N);
 
 Write('K: ');
 Readln(K);
 
 for Ki:=1 to K do
  begin
   Sum:=0;
   Check:=False;
   for Ni:=1 to N do
    begin
     write('Введите ',Ni,' число из ',Ki ,' набора:');
     Readln(A);
     Sum:=Sum+A;
     if A=2 then Check:=True;
    end;
   if Check then Writeln(Sum)
   else Writeln('0');
  end;
end.