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

Question

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

Answer 1

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