• В однородном массиве вещественных чисел найти сумму элементов, предшествующих первому положительному элементу, и количество таких элементов

Ответы 1

  • program Ok;var A:array[1..10] of real;sum:real;i,n:integer;beginrandomize;sum:=0;for i:=1 to 10 dobeginread(A[i]);end;for i:=10 downto 1 dobeginif(A[i]>0) thenn:=i;end;for i:=1 to 9 dobeginif (A[n] = A[i+1]) thensum:=sum+1;end;writeln(sum);end.
    • Автор:

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

Войти через Google

или

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

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

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