вот ответ изи
Объяснение:
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.
вот ответ изи
Объяснение:
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.