, що складається з N елементів. Видалити з масиву А його максимальний елемент. br/>
В В В В В
Графічне подання рішення завдань
В
Завдання № 1:
В
Функція Prime (x)
В В В В В В В
В
(+)
В В
(-)
(-)
В
(+)
В В В В
В
Prime = 0
В В br clear=ALL>В
(+)
В В
(-)
В В В В
В В
В
Завдання № 2:
В В В В В В В В В В В В В В В
(+)
В В
max = A (I), Z = I
В br clear=ALL>В
(-)
В В В В В
(+)
В
S = S +1, B (S) = A (I)
p>
(-) В В В В
Рішення завдань
(мовою програмування В«БейсікВ»)
В
Завдання № 1:
В
DECLARE FUNCTION prime! (X!)
5 CLS
10 INPUT "N (max 300) =", n
20 DIM A (n, n): s = 0
30 FOR i = 1 TO n
40 FOR j = 1 TO n
50 PRINT "A ("; i; ","; j; ") =": INPUT A (j, i)
60 NEXT j, i
70 FOR i = 1 TO n
80 FOR j = 1 TO n
90 IF prime (A (j, i)) <> 0 THEN s = s + 1
100 NEXT j
110 PRINT s: s = 0
120 NEXT i
130 END
В В
FUNCTION prime (x)
prime = 1
FOR i = 2 TO 300
IF x = i THEN 500
IF ((x/i) - (x i)) = 0 THEN prime = 0
500 NEXT i
END FUNCTION
В В В В В В В В
Завдання № 2:
В В
5 CLS
10 INPUT N
20 S = 0
30
