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

program progul ;var total , lost , visit : real ;begin write ('vvedite vsego zaniatii Total=' ) ;  readln ( total ) ; write ( 'vvedite Propuskov =' ) ;  readln ( lost ) ;  visit := (total - lost ) / total * 100 ;  writeln ( 'procent poseshaemosti=' , visit:5:2 , '%' ) ;end.