Необходимо написать программку для решения данной задачки. В классе N воспитанников.

Программа написана на языке Паскаль:

Program test;
var n,a,b,c,d:integer;
begin
writeln(Введите n: );
readln(n);
writeln(Введите A: );
readln(a);
writeln(Введите B: );
readln(b);
writeln(Введите C: );
readln(c);
d := n - (a+b+c);
writeln(Процент троек: +d/(a+b+c)*100);
end.