Введите на экран двойные числа от 1 до к .

var i,k: integer;

begin

readln(k);

for i: =1 to k do

write(i,' ',i,' ')

end.

без остатка нет

25: 2=12+1 клетка в остатке

первый файл займет 2750/1054 =2,6 = 3 кластера(может быть только целое число кластеров).

второй файл займет 324000/1024 = 307,4 = 308 кластеров.

ответ: 3 + 308 кластеров