Вводится количество занятий (часов) по предмету и количество пропущенных занятий. Вычислить процент посещаемости. составьте программу паскаль

program zz1;

var a, b:integer; / / задаем переменные целого типа

n:real; / / задаем переменную не целого типа

begin

write (' введите количество занятий по предмету '); / / вводим с клавиатуры одно число

read (a);

write (' введите количество пропущенных занятий по предмету '); / / вводим с клавиатуры другое число

read (b);

n:=b * 100 / a; / / высчитываем процент посещаемости по формуле

write (' процент посещаемости = ', n:6:2, ' %'); / /выводим ответ в формате шесть знаков для всего числа и два знака после точки

end.