• Создайте модуль, в котором описана функция F, вычисляющая сумму всех элементов массива А[20].

Ответы 1

  • Pascal unit math;  // Имя модуля должно совпадать с именем файлаinterface  const      n = 20;  type     mas = array [1..n] of integer;  function F(a : mas) : integer;  implementation  function F(a : mas) : integer;  var    i,s : integer;  begin   s := 0;    for i := 1 to n do     s := s + a[i];   Result := s;  end;      end.
    • Автор:

      averi
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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