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


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

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

 

Бей­сикПас­каль

N = 30

DIM A(N) AS LONG

DIM I, J, P AS LONG

FOR I = 1 TO N

INPUT A(I)

NEXT I

...

END

const

N = 30;

var

a: array [1..N] of longint;

i, j, p: longint;

begin

for i := 1 to N do

readln(a[i]);

...

end.

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

#include <iostream>

using namespace std;

#define N 30

int main() {

long a[N];

long i, j, p;

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

cin >> a[i];

...

}

алг

нач

цел N = 30

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

цел i, j, p

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

ввод a[i]

кц

...

кон

Eсте­ствен­ный язык
Объ­яв­ля­ем мас­сив A из 30 эле­мен­тов. Объ­яв­ля­ем це­ло­чис­лен­ные пе­ре­мен­ные I, J, P. В цикле от 1 до 30 вво­дим эле­мен­ты мас­си­ва A с 1-го по 30-й.…
Python

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

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

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

a = []

n = 30

for i in range(0, n):

a.append(int(input()))

...

 

В ка­че­стве от­ве­та Вам не­об­хо­ди­мо при­ве­сти фраг­мент про­грам­мы (или опи­са­ние ал­го­рит­ма на есте­ствен­ном языке), ко­то­рый дол­жен на­хо­дить­ся на месте мно­го­то­чия. Вы мо­же­те за­пи­сать ре­ше­ние также на дру­гом языке про­грам­ми­ро­ва­ния (ука­жи­те на­зва­ние и ис­поль­зу­е­мую вер­сию языка про­грам­ми­ро­ва­ния, на­при­мер Free Pascal 2.4) или в виде блок-схемы. В этом слу­чае Вы долж­ны ис­поль­зо­вать те же самые ис­ход­ные дан­ные и пе­ре­мен­ные, какие были пред­ло­же­ны в усло­вии (на­при­мер, в об­раз­це, за­пи­сан­ном на есте­ствен­ном языке).

Ре­ше­ние.

Со­дер­жа­ние вер­но­го от­ве­та (до­пус­ка­ют­ся иные фор­му­ли­ров­ки от­ве­та, не ис­ка­жа­ю­щие его смыс­ла).

 

Бей­сикПас­каль

P = 1

FOR I = 1 TO N

IF A(I)>=10 AND A(I)<=99 AND (A(I) MOD 10+A(I) DIV 10) MOD 6<>0 THEN

P = P * A(I)

END IF

NEXT I

PRINT P

p := 1;

for i := 1 to N do

if (a[i] >= 10) and (a[i] <= 99) and

((a[i] mod 10 + a[i] div 10) mod 6 <> 0) then

p := p * a[i];

writeln(p);

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

p = 1;

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

if (a[i]>=10 && a[i]<=99 && (a[i]%10+a[i]/10)%6 != 0)

p *= a[i];

cout << p;

p := 1

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

если a[i]>=10 и a[i]<=99 и mod(mod(a[i],10)+div(a[i],10),6)<>0

то

p := p * a[i]

все

кц

вывод p

Eсте­ствен­ный язык

За­пи­сы­ва­ем в пе­ре­мен­ную P на­чаль­ное зна­че­ние, рав­ное 1. В цикле от пер­во­го эле­мен­та до трид­ца­то­го на­хо­дим целую часть и оста­ток от де­ле­ния эле­мен­та ис­ход­но­го мас­си­ва на 10. Те­перь на­хо­дим оста­ток от де­ле­ния суммы по­лу­чен­ных двух зна­че­ний на 6. Если ре­зуль­тат не равен 0 и зна­че­ние те­ку­ще­го эле­мен­та мас­си­ва боль­ше 9 и мень­ше 100, то счи­та­ем про­из­ве­де­ние дан­но­го эле­мен­та мас­си­ва и зна­че­ния пе­ре­мен­ной P. Ре­зуль­тат умно­же­ния со­хра­ня­ем в пе­ре­мен­ную P. Пе­ре­хо­дим к сле­ду­ю­ще­му эле­мен­ту мас­си­ва. После за­вер­ше­ния цикла вы­во­дим зна­че­ние пе­ре­мен­ной P

Источник: ЕГЭ по информатике 08.07.2013. Вторая волна. Ва­ри­ант 802.