А интернет для чего тебе? Это же лёгкие вопросы!
Листва, ветки, крона, корни,ствол
Попробуй так:
var P,a,b,c: integer;
readln(a);
readln(b);
readln(c);
P:= a+b+c;
writeln(' P=',P);
end.
14 детей в классе
7 математика
5 оба
2 только история
12 девочек и мальчиков
9 мальчиков
3 девочки
А=7
Б=10*7=70
Х=7+70*7=497
ответ: 497