Поделитесь своими знаниями, ответьте на вопрос:
Составить блок-схемы 1.Напечатать лучший результат заплыва среди 8 участников. 2.Из n введенных чисел найти максимальное значение среди положительных элементов. 3.Из N целых чисел найти максимальное среди положительных и минимальное среди отрицательных значений. 4.Найти максимальный элемент из 12 введенных.
DIM a(10) AS SINGLE, b(10) AS SINGLE, x(10) AS SINGLE
RANDOMIZE TIMER
FOR i = 1 TO 10
a(i) = 30 * RND - 15
NEXT i
FOR i = 1 TO 10
b(i) = 40 * RND - 20
NEXT i
CLS
PRINT "A", "B", "X"
FOR i = 1 TO 10
IF a(i) = 0 THEN
x(i) = 1E+10
ELSE
x(i) = b(i) / a(i)
END IF
PRINT a(i), b(i), x(i)
NEXT i
Тестовое решение:
A B X
-5.504717 19.41665 -3.527274
-5.233851 -11.24631 2.148764
-5.154725 2.927625 -.5679499
5.057724 -8.649354 -1.710128
-6.304109 -19.25289 3.054023
-1.920151 6.061134 -3.156593
-10.34241 17.10881 -1.654238
13.86053 .4965448 3.582438E-02
-4.931755 8.241055 -1.671019
8.120502 8.78438 1.081753