Question

Напишите код программы, которая будет вычислять периметр фигуры.Program Perimeter;VarBeginWritelnReadlnEnd.Скажите срочно пожалуйста , контрольная по информатикеЗаранее спасибо

Answer 1

Var
a,b,c:real;
begin
Writeln('Введите стороны треугольника');
Readln(a,b,c);
Writeln('P =',a + b +c);
end.
Пример:
Введите стороны треугольника
1 2 3
P =6