задача 8.11 напиши программу которая принимает с клавиатуры 2 числа 1 количество учеников в классе, 2 количество стульев в классе программа проверит соответствие между двумя соответствиями и выведет на экран соответствующие цифры например 35, 39 разделить на экран проводит 4 лишних.

Pascal:type  cl=class    public    children:integer;    f:integer;    ff:integer;      end;  var     c:cl;begin  c:=new cl;  writeln('Введите кол-во учеников: ');  read(c.children);  writeln('Введите кол-во стульев: ');  read(c.f);  if c.children>c.f then  begin  writeln('Некорректное значение (учеников < стульев)');  Halt;  end;  c.ff:=c.f mod c.children;  writeln('Кол-во учеников: ',c.children);  writeln('Кол-во стульев: ',c.f);  writeln('Кол-во лишних стульев: ',c.ff);  end.(Если учеников больше, чем стульев, программа закроется с уведомлением. Если учеников столько же, сколько и стульев или меньше, то напишет кол-во лишних стульев).