Даны целочисленные координаты точки на плоскости. Если точка не лежит на координатных осях, то вывести 0. Если точка совпадает

var x, y : integer;
begin
   write('x = '); readln(x);
   write('y = '); readln(y);
   if (x = 0) and (y = 0) then writeln(1)
   else if (x = 0) then writeln(2)
   else if (y = 0) then writeln(3)
   else writeln(0)
end.

Ответ,пять килограмм

20+25+25=69 (всего учеников)690÷69=10 ( каждый ученик)24*10= 24025*10=25020*10=200