• Помогите решить, пожалуйста!
    Даны стороны трёх треугольников. Найдите сумму их периметров. Определите процедуру для расчёта периметра треугольника.
    Написать программу для Pascal. Задача с использованием подпрограмм-процедур.

Ответы 2

  • Спасибо большое!
  • procedure Calc(const a,b,c: real; var p: real);begin  p := a + b + c;end;var a, b, c, p: real;begin  readln(a);  readln(b);  readln(c);  Calc(a, b, c, p);  writeln(p);end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years