СДАМ ГИА: РЕШУ ЕГЭ
Образовательный портал для подготовки к экзаменам
Информатика
≡ информатика
сайты - меню - вход - новости


Задания
Версия для печати и копирования в MS Word
Задание 25 № 2909

Опишите на русском языке или на одном из языков программирования алгоритм подсчета суммы всех отрицательных элементов заданного целочисленного массива размером 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);