Задать вопрос Регистрация
Помочь другим

  • дан массив целых чисел.найти сумму кубов всех отрицательных элемнтов массива.

Ответы 1

  • program z4;uses crt;var a:array[1..25] of shortint;i:byte;s:longint;beginclrscr;randomize;for i:=1 to 25 do begina[i]:=random(10--10+1)+-10;write(a[i]:4);if a[i]<0 thens:=s+a[i]*a[i]*a[i];end;writeln;write('‘Сумма кубов отрицательных чисел равна ',s);readkeyend.

    • Автор:

      kc
    • 6 лет назад
    • 0

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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