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

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

import random

N = random.randrange(1,10)
print("N = ",N)
K = random.randrange(1,10)
print("K = ",K)
r = 0
for i in range(N):
    x = random.randrange(3,15)
    if x < K:
        r += 1
    print(x," : less than K - ",r)

if r > 0:
    x = True
else:
    x = False
print("There is a number less than K:",x)
									

program Series11;
var
  check:Boolean;
  i,N,K,R:Integer;
begin
  Write('Введите K: ');
  Readln(K);
  Write('Введите N: ');
  Readln(N);
  check:=False;
  for i:=1 to N do
   begin
     Write('Введите ',i,' число: ');
     Readln(R);
     if R <K then  check:=True;
   end;
  Writeln(check);
end.