11.10.2006

Массивы. Решение задач, на нахождение элементов, отвечающих условию

Учимся решать задачи с использованием условий.

Цель: научиться решать задачи с использованием условий.

Ход урока:

1. Опрос: у доски решить задачу: Найти сумму элементов каждой строки двумерного массива. А(3,4) задан по формуле А(I,J)=cos(I)+sin (J)

Построить блок-схему и написать программу на языке Бейсик. Повторить элементы блок-схем.

Dim a(3,4)
For i=1 to 3
For j=1 to 4
А(I,J)=cos(I)+sin (J)
? А(I,J);
next J
?
next I
S=0
For i=1 to 3
For j=1 to 4
S=S+ А(I,J)
next J
? “S(“;I;”)=”;S
next I

Решение задач, на нахождение элементов, отвечающих условию

Подсчет количества четных элементов

Dim a(2,3)
For i=1 to 2
For j=1 to 3
А(I,J)=INT(RND(1)*10)
? А(I,J);
IF А(I,J)/2=INT(А(I,J)/2) AND А(I,J)<>0 THEN K=K+1
next J
?
next I
? “Четных элементов-“; K
END

Закрепление: отладка программ на ЭВМ.

д/з Решить задачу: Задан линейный массив из 12 элементов, сформировать из него прямоугольный размером 3*4.