Question

найти периметр треугольника авс через паскаль

Answer 1

program abc;
var a,b,c,P:real;
begin
readln (a,b,c);
P:=a+b+c;
writeln ('P=', P);
end.