Опишите на русском языке или на одном из языков программирования алгоритм подсчета суммы всех отрицательных элементов заданного целочисленного массива размером 30 элементов. Если отрицательных элементов нет, сообщите об этом.
Исходные данные объявлены так, как показано ниже.
| Бейсик | Паскаль |
|---|---|
N=30 DIM A(N) AS INTEGER DIM I, S AS INTEGER FOR I = 1 TO N INPUT A(I) NEXT I … END | const N=30; var a: array [1..N] of integer; i, s: integer; begin for i:=1 to N do readln(a[i]); … end. |
| Си++ | Алгоритмический |
#include <iostream> using namespace std; #define N 30 int main(void) { int a[N]; int i, s; for (i=0; i < N; i++) cin >> a[i]; … } | алг нач цел N = 30 целтаб a[1:N] цел i, s нц для i от 1 до N ввод a[i] кц ... кон |
| Русский (естественный) язык | |
Объявляем массив A из 30 элементов. Объявляем целочисленные переменные I, S. В цикле от 1 до 30 вводим элементы массива A с 1-го по 30-й. … | |
| Python | |
# допускается также # использовать # целочисленную переменную s a = [] n = 30 for i in range(0, n): a.append(int(input())) ... | |
Код, приведённый ниже, решает поставленную задачу:
const
N = 30;
var
a: array [1..N] of longint;
s, i:integer;
begin
for i := 1 to N do
readln(a[i]);
s :=0;
for i:=1 to N do
if a[i] < 0 then
begin
s := s + a[i];
end;
if s=0
then write (‘Отрицательных элементов нет’)
else write (s);

