Составление блок-схемы и программы для трехкратного вывода на экран слова «Мир». Составление блок-схемы и программы нахождения большего из трех чисел, страница 2

Составить программу вычисления и вывода на экран первых десять элементов последовательности заданной функции

Хn=1+tg (n-1)

X1=1+tg(1-2)

X2=1+tg (2-2)

X3=1+tg (3-2)

X4=1+tg (4-2)

……

X10=1+tg (10-2)

Блок-схема программы представлена на рисунке 1.5

                                                      начало

I=1,10,1

 

                                                 X=1tg(I-2)

                                                      Ввод А

 

конец

Рисунок 1.5  -  Блок-схема программы.

Текст программы:

CLS

FOR I =1, TO 10

LET X = 1+TAБ (I-2)

PRINT X

NEXT I

END

5                                                       X

10

Y

SCREEN 12

FOR = X = 5 TO 640 STEP 10

LINE (X,1) – (X,460)

NEXT X

1.6.Задание 6

Из двух чисел введенных с клавиатуры найти наибольшее число.

Текст программы:

REM БИД

INPUT «введите А, Б»; А,Б

IF A›B THEN Y = A ELSE Y = B

PRINT Y

END

Блок-схема программы представлена на рисунке 1.6

 

                                            начало

                                            А,В

A›B

Y=B                                                          Y=A

Y

 

конец

Рисунок 1.6  -  Блок-схема программы

 

2. Лабораторная работа 2

2.1 Задание 1

Составить блок-схему и программу нахождения большего из трех чисел.

Блок-схема программы представлена на рисунке 2.1

начало                                                                     начало ввод А,В,С                                                                    X › Y

Х=А :Y=B

Z=Y                                       Z=X

БИД (Х,Y)

Х=Z : Y=C                                                                       конец

БИД(X,Y)                                                                        

 

Вывод «БИД=»:Z

                                                                      

      конец

Рисунок 2.1  -  Блок-схема программы

Текст программы:

REM

INPUT A,B,C

X = A : Y = B

GOSUB 90

PRINT «БИД=»;Z

END

90 REM

IF X › Y THEN Z = X ELSE Z = Y

RETURN

2.2 Задание 2

Вычислить S и Р прямоугольника со сторонами 10 и 15,5 используя оператор LET.

Блок-схема программы представлена на рисунке 2.2     

начало

А = 10

В = 15,5

Р =2(а+в)      

S =a*b

Вывод P,S    конец   

Рисунок 2.2  -  Блок-схема программы

Текст программы:

CLS

LET A=10

LET B=15,5

LET P=2*(A+B)

PRINT «Р=»; Р

PRINT «S=»; S

END

2.3 Задание 3

Вычислить длину AD, где  А=4; В=2,3; С=-5.

D=√A²+B²+C²

Блок-схема программы представлена на рисунке 2.3     

начало ввод А,В,С

   D= √A²+B²+C ²

Ввод D                       конец

Рисунок 2.3  -  Блок-схема программы

Текст программы:

CLS

DATA 4; 2,3; -5

READ A,B,C

LET D = SGR (A^2+B^2+C^2)

PRINT «D=»; D

END

 

2.4 Задание 4

Составить блок схемы и программу для вычисления функции.

Х² +1, если Х ≤-3 

У=    

Х-1, если Х› -3                           начало ввод х      х≤-3           +

              у=х-1                                         у=х²+1                 

 

                                        ввод у

 

конец

Рисунок 2.4  -  Блок-схема программы

Текст программы:

CLS

INPUT «ВВЕДИТЕ Х»; Х

IF X <=-3 THEN Y=X^2+1

ELSE Y=X-1

PRINT «Y=»;Y

END

2.5 Задание 5

Cоставить блок схему и программу для вычисления функции

                       -1, x<0

F=    0, x=0

1, если х>0

Блок-схема программы представлена на рисунке 2.5    

начало ввод Х

+         Х<0          -      

F=-1                      -                             +

X=0

 

F=-1                                       F=0

Вывод F

конец

Рисунок 2.5  -  Блок-схема программы

Текст программы:

CLS

INPUT X<0 THEN F=-1: GOTO 10

IF X=0, THEN F=0 ELSE F=1

10 PRINT F

END

2.6 Задание 6

Подсчитать сколько раз в строке символов встречается знак «?»

Текст программы:

CLS

INPUT “ввести слово”; A $

K=0

FOR I=1 TO LEN (A $)

IF MID $ (A $,I,1)=”?” THEN K=K+1

NEXT I

PRINT “количество ?”; К

 

Список использованных источников

1.Бочков С.О., Субботин Д.М. Язык программирования Си для персонального компьютера. – М.: Радио и связь, 1990.-384 с.

2.Иванов А.Г. Язык программирования Си: Предварительное описание // Прикладная информатика. – 1985. – Вып. 1 – С. 68-113.

3.Уэйт М., Прата С., Мартин Д. Язык QBASIC. Руководство для начинающих: Пер. с англ. – М.: Мир, 1988.-450 с.

4.Бахвалов П.Т. Численные методы. - М.: Высшая школа, 1983. 166 с.

5.Турчак С.Б.  Численные методы. - М.: Энергоатомиздат, 1985. 432 с.

 

,