Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Lab_4_otvet.doc
Скачиваний:
15
Добавлен:
24.03.2015
Размер:
700.93 Кб
Скачать

Вариант 1

1. Найти сумму элементов массива, расположенных на нечетных местах

нач

ввод А

S:=0

нц для i от 1 до 10 шаг 2

S:=S+A(i)

кц

вывод S

кон

Выполнение этого алгоритма для массива А=(2, -3, 4, 5, -1, -2, 5, 0, -2, 3)

действие

S

i

A(i)

S:=0

0

нц для i от 1 до 10 шаг 2

0

1

2

S:=S+A(i)

2

1

2

кц

2

3

4

S:=S+A(i)

6

3

4

кц

6

5

-1

S:=S+A(i)

5

5

-1

кц

5

7

5

S:=S+A(i)

10

7

5

кц

10

9

-2

S:=S+A(i)

8

9

-2

кц

8

11

вывод S

8

2. На основе заданного массива построить массив, в котором положительные числа остаются на своих местах, а вместо отрицательных чисел записываются нули.

нач

ввод А

нц для i от 1 до 10 шаг 1

если A(i)>0 то B(i):=A(i) иначе B(i):=0

кц

вывод B

кон

Выполнение этого алгоритма для массива А=(2, -3, 4, 5, -1, -2, 5, 0, -2, 3)

действие

i

A(i)

A(i)>0

B(i)

нц для i от 1 до 10 шаг 1

1

2

если A(i)>0 то B(i):=A(i) иначе B(i):=0

1

2

истина

2

кц

2

-3

если A(i)>0 то B(i):=A(i) иначе B(i):=0

2

-3

ложь

0

кц

3

4

если A(i)>0 то B(i):=A(i) иначе B(i):=0

3

4

истина

4

кц

4

5

если A(i)>0 то B(i):=A(i) иначе B(i):=0

4

5

истина

5

кц

5

-1

если A(i)>0 то B(i):=A(i) иначе B(i):=0

5

-1

ложь

0

кц

6

-2

если A(i)>0 то B(i):=A(i) иначе B(i):=0

6

-2

ложь

0

кц

7

5

если A(i)>0 то B(i):=A(i) иначе B(i):=0

7

5

истина

5

кц

8

0

если A(i)>0 то B(i):=A(i) иначе B(i):=0

8

0

ложь

0

кц

9

-2

если A(i)>0 то B(i):=A(i) иначе B(i):=0

9

-2

ложь

0

кц

10

3

если A(i)>0 то B(i):=A(i) иначе B(i):=0

10

3

истина

3

B=(2, 0, 4, 5, 0, 0, 5, 0, 0, 3)

Вариант 2

1. Найти произведение отрицательных элементов массива

нач

ввод А

P:=1

нц для i от 1 до 10 шаг 1

если A(i)<0 то P:=P*A(i)

кц

вывод P

кон

Выполнение этого алгоритма для массива А=(-2, 3, 4, -5, 1, 2, 5, 0, -1, 3)

действие

P

i

A(i)

A(i)<0

P:=1

1

нц для i от 1 до 10 шаг 1

1

1

-2

если A(i)<0 то P:=P*A(i)

-2

1

-2

истина

кц

-2

2

3

если A(i)<0 то P:=P*A(i)

-2

2

3

ложь

кц

-2

3

4

если A(i)<0 то P:=P*A(i)

-2

3

4

ложь

кц

-2

4

-5

если A(i)<0 то P:=P*A(i)

10

4

-5

истина

кц

10

5

1

если A(i)<0 то P:=P*A(i)

10

5

1

ложь

кц

10

6

2

если A(i)<0 то P:=P*A(i)

10

6

2

ложь

кц

10

7

5

если A(i)<0 то P:=P*A(i)

10

7

5

ложь

кц

10

8

0

если A(i)<0 то P:=P*A(i)

10

8

0

ложь

кц

10

9

-1

если A(i)<0 то P:=P*A(i)

-10

9

-1

истина

кц

-10

10

3

если A(i)<0 то P:=P*A(i)

-10

10

3

ложь

вывод P

-10

Соседние файлы в предмете Информатика