Номер 8 на фото У меня все супер, кроме программирования. С объяснением

Program glg;
var
a:array[1..10] of integer;
min, kol: integer;

begin
i := 0;
kol:=0;
min:= 100000;
while i < 10 do
begin
readln (a[i]);
if a[i] < min then min:= a[i];
end

i:=0;
while i < 10 do
if a[i] = min then kol = kol + 1;
writeln(kol);
end.

Если ошибки будут, пишите в комментарии. Я с телефона писал, мог где-нибудь, да ошибиться. (Написано на Pascal)

Текстовые процессоры,электронные таблицы,графические редакторы,растровые

Можете пожалуйста получше сфотографировать,а то плохо видно)

1) Переводим  203.15 в десятичную систему счисления и получаем:110010112 
2) Переведем 69.48 в восьмеричную систему, получаем 105.36560507534 или 105(8)
3)Переведем 351.125 в шестнадцатиричную систему, получаем 15F.2 или 15F(16)