Question

PASCAL Составьте программу, которая вычисляет периметр треугольника со сторонами a, b и c и выводит результат на экран

Answer 1

//PascalABC.NET
//Версия 3.3, сборка 1611
begin
var (a,b,c):=ReadReal3('Введите 3 стороны треугольника через пробел:');
write('периметр: P=',a+b+c);
end.

Answer 2

Var a, b, c, p :longint;
begin
WriteLn('Введите a');
readLn(a);
WriteLn('Введите b');
readLn(b);
writeLn('Введите c');
readLn(c);
p:=(a+b+c);
writeLn('Периметр', p);
end.