Задание 1

Вычислить функцию:

при a=1.327, b=0.00823, c=21.02, d=1.3139, p=3.1415

Блок-схема алгоритма

 

Программа

10 INPUT "Введите значения параметров A,B,C,D,P",A,B,C,D,P

20 Y=D+(ABS(A^2-B^2)/SIN(P/C))^2/5-2

30 PRINT "Значение функции =",Y

40 END

Контрольный пример

Задание 2

Вычислить функцию

при x≤0 при 0<x<3.5 при x≥3.5

Блок-схема алгоритма

 

 

 

Программа

10 INPUT"Введите значение X",X

20 IF X<=0 THEN Y=TAN(X):GOTO 40

30 IF X<3.5 THEN Y=X*EXP(X) ELSE Y=X+1

40 PRINT "При X=”,X;”Y=”,Y

50 END

Контрольный пример

1)    при X=-2  Y=2.185

2)    при X=3  Y=60,256

3)    при X=5  Y=6

Задание 3

Найти значение P=X*Y, где X – максимальный элемент массива A(N), Y – минимальный элемент массива A(N).

 

Блок-схема алгоритма

 

 

 

 

 

Программа

10 INPUT" Введите число элементов массива ",N

20 DIM A(N)

30 FOR I=1 TO N

40 INPUT A(I)

50 NEXT I

60 Y=A(1): X=A(1)

70 FOR I=1 TO N

80 IF A(I)<Y THEN Y=A(I)

90 IF A(I)>X THEN X=A(I)

100 NEXT I

110 P=X*Y

120 PRINT "P=",P;

130 END

Контрольный пример

N=7, A(N)={5, 3, -2, 7, 4, 4, 8}

X=8, Y=-2, P=8*(-2)=-16

Задание 4

Вычислить сумму и количество элементов находящихся в интервале (a,b), для матрицы A(N,M).

 

Блок-схема алгоритма

 

Программа

10 INPUT " Введите число строк ",N

20 INPUT " Введите число столбцов ",M

30 DIM A(N,M)

40 INPUT "Введите параметры A,B",A,B

50 FOR I=1 TO N

60 FOR J=1 TO M

70 INPUT A(I,J)

80 NEXT J

90 NEXT I

100 SUM=0: K=0

110 FOR I=1 TO N

120 FOR J=1 TO M

130 IF A(I,J)>=A AND A(I,J)<=B THEN SUM=SUM+A(I,J): K=K+1

140 NEXT J

150 NEXT I

160 PRINT "Сумма элементов находящихся в интервале (A,B) =",SUM

170 PRINT "Количество элементов находящихся в интервале (A,B) =",K

180 END

Контрольный пример

N=4, M=4, A=3, B=7

SUM=37, K=8