Программирование

30 IF Y>0 THEN K=1 ELSE K=2

40 PRINT Y, K

50 END

б). Исполнить программу, выполнив RUN, при появлении на экране знака: ? , что означает запрос по команде INPUT на ввод числа с клавиатуры, набрать любое число и ввести его, нажав клавишу ENTER.

в). Наблюдать на экране результат решения в виде двух чисел, при этом, если первое из них положительно, то второе число будет равным 1, и наоборот, если первое число отрицательно, то второе равно 2.

г). Очистить память NEW и экран компьютера CLS.

Задача 4: (циклический алгоритм)

а). Набрать текст программы:

10 H=20

20 C=H-8

30 PRINT H, C

40 H=H-6

50 IF C>0 GOTO 20

60 END

б). Распечатать текст программы на экране.

в). Исполнить программу и наблюдать результат:

20 12

14 6

8 0

г). Очистить экран и память.

Задача 5: (разветвленный алгоритм)

Решить задачу с условием: подсчитать значение величины Y по формуле: Y=X²+А при X<0 и по формуле: Y=tg(X³)-sin(X/3)-А при X>=0.

а).Набрать текст программы:

10 INPUT “A, X=”;A,X

20 IF X>=0 GOTO 50

30 Y=X^2+A

40 GOTO 60

50 Y=TAN(X^3)-SIN(X/3)-A

60 PRINT “Результат=”,X,Y

70 END

б). Исполнить программу, при появлении на экране записи: A,X=? ввести с клавиатуры два числа через запятую и нажать клавишу ENTER.

в). Наблюдать результат в виде записи: Результат= с двумя числами, записанными с промежутком между ними.

г). Очистить экран и память ЭВМ.

Задача 6: (циклический алгоритм)

а). Набрать текст программы:

10 FOR X=0 TO 0.5 STEP 0.1

20 Y=10*X+5

30 PRINT X,Y

40 NEXT X

50 PRINT

60 PRINT “X=”,X

70 END

б). Исполнить программу и наблюдать на экране результат:

0 5

0.1 6

0.2 7

0.3 8

0.4 9

0.5 10

Х= 0.6

в). Очистить экран и память.

Задача 7: (циклический алгоритм, использование массива случайных чисел)

Заполнить массив размером 6 случайными числами в диапазоне от 0 до 10 и распечатать номер элемента массива и его значение.

а). Набрать текст программы:

10 DIM A(6)

20 FOR I=1 TO 6

30 A(I)=10*RND(1)

40 PRINT I,A(I)

50 NEXT I

60 PRINT “Индекс I стал равен:”,I

70 END

б). Исполнить программу и наблюдать результат:

в). Очистить экран и память.

Задача 8: (алгоритм, включающий условие и цикл)

Определить максимальное значение функции: Y=sin(X)+ln(X) в интервале значений аргумента от 1 до 3 с дискретностью 0.01 .

10 REM Программа

20 YMAX=0

30 GOSUB 60

40 PRINT XMAX,YMAX

50 END

60 REM Подпрограмма

70 FOR X=1 TO 3 STEP 0.01

80 Y=SIN(X)+LOG(X)