Question

Составить программу в Паскале.
Даны стороны треугольника а,в,с.Найти его периметр.

Answer 1

Program asd;
 Var a,b,c,p :integer;
begin
Write('Введите первую сторону треугольника a: '); readln(a);
Write('Введите вторую сторону треугольника b: '); readln(b);
write('Введите третью сторону треугольника c: '); readln(c);
p:=(a+b+c);
Writeln('Периметр треугольника равен: ',p);
end.

Answer 2

спасибо!