Найти количество элементов массива до первого элемента равного 111

@alex50cent1 · Регистрация: 20.10.2010

Author24 — интернет-сервис помощи студентам

Доброго времени суток!прошу помочь решить лабораторные по информатике!значит так!1)дан массив из 10 элементов.найти количество элементов массива до первого элемента равного 111.2)дана матрица из 3ех строк и 2ух столбцов.Найти сумму элементов 2ого столбца матрицы.

@Lyohich84 · 27.12.2010, 09:54

1

PureBasic

CLS
n=10
DIM a(n)
FOR i=1 TO n
 PRINT "a(";i;")=";
 INPUT a(i)
NEXT i
PRINT "Massiv"
FOR i=1 TO n
 PRINT a(i);
NEXT i
PRINT
k=0
FOR i=1 TO n
 IF a(i)=111 THEN EXIT FOR
 k=k+1
NEXT i
IF k= n THEN
 PRINT "V massive net elementa=111"
ELSE
 PRINT "Do pervogo elementa=111 kolvo elementov=";k
END IF

2.

PureBasic

CLS
n=3:m=2
DIM a(n,m)
RANDOMIZE TIMER
FOR i=1 TO n
 FOR j=1 TO m
  a(i,j)=INT(RND*101)-50
 NEXT j
NEXT i
PRINT "Matrica"
FOR i=1 TO n
 FOR j=1 TO m
  PRINT a(i,j);
 NEXT j
 PRINT
NEXT i 
PRINT 
s=0
FOR i=1 TO n
 s=s+a(i,2)
NEXT i
PRINT "Summa vtorogo stolbca=";s

@alex50cent1 0 / 0 / 0 Регистрация: 20.10.2010 Сообщений: 3
		1
	Найти количество элементов массива до первого элемента равного 111 23.12.2010, 19:20. Показов 976. Ответов 1 Метки нет (Все метки) Доброго времени суток!прошу помочь решить лабораторные по информатике!значит так!1)дан массив из 10 элементов.найти количество элементов массива до первого элемента равного 111.2)дана матрица из 3ех строк и 2ух столбцов.Найти сумму элементов 2ого столбца матрицы. 0

	27.12.2010, 09:54

Опции темы

Найти количество элементов массива до первого элемента равного 111

Решение