Напишите программу, подсчитывающую количество оценок за контрольную, если в классе 20 учеников)(в паскале)

Const   students = 20; var   marks: byte : = students; begin   writeln('все пришли? ');   var c: string;   readln(c);   if not (c in ['yes', '1', 'true', 'да']) then   begin     writeln('сколько не пришло? ');     var b: byte;     readln(b);     marks : = (marks > b ? marks - b : 0);     end;   writeln(marks, ' оценок'); end.

3+3-3: 3=5

3-3+3+3=6

3: 3+3+3=7

3*3-3: 3=8

3*3*3: 3=9

3* 3+3: 3 = 10

program primitive;

var a,b: integer;

begin 

read(a,b);

writeln(a mod b);

end.чему в школе то