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




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

 Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от 0 до 1000. Опишите на языке программирования или естественном языке, алгоритм позволяющий найти и вывести сумму элементов массива, не кратных пятнадцати. Гарантируется, что в исходном массиве есть хотя бы один элемент, значение которого не делится на пятнадцать. Исходные данные объявлены так как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них.

 

БэйсикПаскаль

N=30

DIM A(N) AS INTEGER

DIM I, J, 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, j, s: integer;

begin

for i:=l to N do

readln(a[i]);

...

end.

Си++Алгоритмический язык

#include <iostream>

using namespace std;

#define N 30

int main(){

int a[N];

int i, j, s;

for (i=0; i < N; i++)

cin >> a[i];

...

алг

нач

цел N=30

целтаб а[1:N]

цел i, j, s

нц для i от 1 до N

ввод а[i]

кц

...

кон

Python

# допускается также

# использовать две

# целочисленные переменные j, s

a = []

n = 30

for i in range(0, n):

a.append(int(input()))

...

 

Решение.

 

ПАСКАЛЬБЕЙСИК
s:=0;

for i:=1 to N do

if (a[i] mod 15<>0) then

s:=s+a[i];

writeln(s);

S = 0

FOR I=1 TO N

IF A(I) MOD 15<>0 THEN

S=S+A(I)

NEXT

PRINT S

СИЕстественный язык
s=0

for (i=0; i<N; i++)

if (a[i]%15!=0)

s+=a[i];

cout << s;

Записываем в переменную S начальное значение, равное 0. В цикле от первого

элемента до тридцатого находим остаток от деления элемента исходного массива

на пятнадцать. Если остаток от деления на пятнадцать не равен нулю, то считаем

сумму текущего элемента массива и значения переменной S. Результат сложения

сохраняем в переменную S. Переходим к следующему элементу массива. После

завершения цикла выводим значение переменной S.