Перепишите строки программы так что-бы получилась программа для вычисления периметра треугольрика по трём вредным длина сторон.
writeln('Периметр равен', P);
writeln('Введите три числа>>');
begin
P:=a+b+c;
read(a,b,c);
var a, b,c, P: integer;
Program Perim;
end.
writeln('Периметр равен', P);
writeln('Введите три числа>>');
begin
P:=a+b+c;
read(a,b,c);
var a, b,c, P: integer;
Program Perim;
end.
More Questions From This User See All
Answers & Comments
Program Perim;
var a, b,c, P: integer;
begin
writeln('Введите три числа>>');
read(a,b,c);
P:=a+b+c;
writeln('Периметр равен', P);
end.