посчитайте Периметр треугольника равен Р, длина одной стороны равна А, а другой - В. Найти длину третьей стороны. напишите программу на паскале

вот изи

Program z3;

var P,A,B,C: integer;

begin

write('Введите периметр:');

readln(P);

write('Введите первою сторону:');

readln(A);

write('Введите второю сторону:');

readln(B);

C:=P-(A+B);

writeln('Третья сторона => ',C);

end.