Вмассив вводят размеры n файлов (в байтах) от 100 до 9000. преобразовать все значения превышающие 1024 байта в килобайты

var a: array[1..250] of string; size: real; i,n: integer; text: string; begin    writeln('daite n'); readln(n);     for i: =1 to n do        begin              readln(size);               if (size> 1024) or (size=1024) then                      begin                            size: =size/1024;                             str(size: 0: 2,text);                             a[i]: =text+' kb';                             text: =''; size: =0;                       end else                begin                          str(size,text); a[i]: =text+' bytes'; text: =''; size: =0;                 end;           end;   for i: =1 to n do write(a[i],' '); readln; end.

Код:

names = []

for i in range(4):

  names.append(input())

print("\n")

i = 0

while i < len(names):

  print(names[i], names[i + 1])

  i += 2