Пожалуйста помогите!!!Найти все делители числа 132 в паскале))))))Распишите все пожалуйста))

var i: integer, s, stri: string BEGIN s := "1; " ' 1 - делитель любого числа for i := 2 to 132 do ' проверяем все числа от 2 до 132 begin if (132 mod i = 0) then begin str(i; stri); (s := concat(s, stri, "; "); end; ' если 132 делится на очередное число, приписываем его к ответу end; writeln (s); ' выводим ответ в виде строки через ; END .