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

program zz1;

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

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

begin

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

read(a);  

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

read(b);  

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

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

end.