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

#include <stdio.h>
int main(void)
{
    int k,r=1,num=0;
    printf("K:");
    scanf("%i", &k);
    while (r!=0){
        printf(">");
        scanf("%i", &r);
        if (r<k) ++num;
    }
    printf("%i\n",num-1);
 
    return 0;
}

import random

K = random.randrange(-3,5)
print("K = ",K)

x = random.randrange(1,10)
print(x,end='; ')
k = 0
if x < K:
    k += 1
while x != 0:
    if x < K:
        k += 1
    x = random.randrange(-5,6)
    print(x,end='; ')
    
print()
print("Amount of numbers less than K:",k)
									

program Series14;
var
  i,R,K:Longint;
begin
write('Введите K : ');
readln(K);
R:=1;
i:=0;
  while(R<>0) do
   begin
     write('Введите число из набора: ');
     Readln(R);
     if R<K then i:=i+1;
   end;
  i:=i-1;
  Writeln(i);
  readln;
end.