Нельзя преобразовать тип string к integer? что исправить нужно помогите пожалуйста

program B_8;
uses crt;
var
catName: string; // Имя кошки должно быть строкой
h: string; // Переменная для хранения имени кошки с лучшим результатом
i, score: integer; // Баллы - целые числа
o: char; // Для ответа y/n лучше использовать тип char (char хранит один символ)
begin
h := ''; // Инициализация пустой строки
i := 0; // Начальное значение для максимального балла

repeat
write('Введите имя кошки: ');
readln(catName); // Используем переменную catName вместо c

write('Введите баллы для ', catName, ': ');
readln(score); // Используем переменную score, которую нужно объявить

if score > i then
begin
i := score;
h := catName;
end;

write('Хотите ввести данные для другой кошки? (y/n): ');
readln(o);
until o = 'n';

writeln('Кошка с наилучшим результатом: ', h, ' с баллами ', i);
end.

какое отношение к джаве?
проси администрацию чтобы по паскакалю раздел сделали...