Задание 1
Вычислить
функцию:
при a=0.87, b=-1.8, z=24.2, x=0.1019
Блок-схема алгоритма
Программа
10
INPUT " Введите значения
параметров A, B, Z, X", A, B, Z, X
20 Y = (2.5 * X ^ 2 + 1.8 * X -
SIN(Z) * SIN(Z)) / (SQR(ABS(COS(B) - A)))
30
PRINT " Значение функции
=", Y
END
Контрольный пример
Задание 2
Вычислить функцию
Блок-схема алгоритма
Программа
10 INPUT "
Введите значение X", X
20 IF X <= 3 THEN Y = X - 1.5 ELSE
Y = X + 1
30 PRINT " При X=", X; "Y=", Y
40 END
Контрольный пример
1) при X=2 Y=0.5
2) при X=3 Y=1.5
3) при X=4 Y=5
Задание 3
Вывести
на печать элементы массива B(N), не кратные двум и найти их количество.
Блок-схема алгоритма
Программа
10
INPUT " Введите число
элементов массива ", N
20 DIM B(N)
30 K = 0
40 FOR I = 1 TO N
50 INPUT B(I)
60 NEXT I
70 FOR I = 1 TO N
80 EL = B(I) / 2
90 IF ABS(EL) - INT(ABS(EL)) = 0 THEN
GOTO 110
100
PRINT "Число не кратное 2 -",
EL: K = K + 1
110
NEXT I
120
PRINT "Число элементов не
кратных 2", K
130
END
Контрольный пример
N=10, B(N)={3, -2, 5,
7, -4, 1, -8, 3, 5, 4}
EL={3, 5, 7, 1, 3, 5}, K=6
Задание 4
Найти максимальный элемент матрицы A(N,M) и записать нули в ту строку, где он находится..
Блок-схема алгоритма
Программа
10 INPUT " Введите число строк ", N
20 INPUT " Введите число столбцов ", M
30 DIM A(N, M)
40 FOR I = 1 TO N
50 FOR J = 1 TO M
60 INPUT A(I, J)
70 NEXT J
80 NEXT I
90 MAX = A(1, 1)
100 FOR I = 1 TO N
110 FOR J = 1 TO M
120 IF A(I, J) >
MAX THEN MAX = A(I, J): STR = I
130 NEXT J
140 NEXT I
150 FOR J = 1 TO M
160 A(STR, J) = 0
170 NEXT J
180 PRINT "Максимальный элемент =", MAX
190 END
Контрольный пример
N=5, M=3
MAX=8, STR=2