double arrow

Задача №4. Найти и вывести сумму элементов массива А, состоящего из 5 элементов


Найти и вывести сумму элементов массива А, состоящего из 5 элементов.

РЕШЕНИЕ

АЛГОРИТМ ПРОГРАММА НА QBASIC

 
 


REM программа решения задачи 4

I = 1
DIM A(5)

FOR I = 1 TO 5

INPUT «введите A(I)»; A(I)

NEXT I

S = 0

FOR I = 1 TO 5

I = I + 1
S = S + A(I)

NEXT I

PRINT S

ДА END

S = 0
НЕТ

       
   
I = 1
 
 


I = I + 1

 
 


ДА

 
 


НЕТ


Задача №5

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

РЕШЕНИЕ

АЛГОРИТМ ПРОГРАММА НА QBASIC

 
 


REM программа решения задачи 5

INPUT n

DIM V(n)

FOR i = 1 TO n

INPUT «введите V(i)»; V(i)

i = 1
NEXT i

p = 1: k = 0

FOR i = 1 TO n

IF V(i) < 0 THEN

p = p* V(i): k = k + 1

END IF

i = i + 1
NEXT i

PRINT p; k

ДА END

 
 


НЕТ


НЕТ ДА

 
 


ДА


НЕТ



Определение максимального элемента массива.







Сейчас читают про: