Основи ПЕОМ

Державний Комітет Російської Федерації за найвищим образованию.

Московська державна текстильна академія імені А. Н. Косыгина.

кафедра інформатики, і обчислювальної техники.

[pic].

Практична робота з курсу.

основи ПЭВМ.

Група № 46−94.

Студент Бондаренко Ю. М. Керівник Цимбалюк М. Я. Перевірила Маланина Е.М.

Москва 1995 Содержание:

1. Використання символьних функций.

1.1 Постановка задачи.

1.2. Умовні обозначения.

1.3. Блок-схема алгоритму рішення задачи.

1.4. Программа.

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

2. Рішення нелінійних уравнений.

2.1 Постановка задачи.

2.2. Умовні обозначения.

2.3. Блок-схема алгоритму рішення задачи.

2.4. Программа.

2.5. Результати рішення уравнения.

3. Обробка даних щоб одержати статистичних оценок.

3.1 Постановка задачи.

3.2. Умовні обозначения.

3.3. Блок-схема алгоритму рішення задачи.

3.4. Программа.

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

4. Фундаментальна обізнаність із каталоги і файлами в MS — DOS.

4.1. Постановка задачи.

4.2. Задание.

5. Фундаментальна обізнаність із каталоги і файлами у системі NORTON COMMANDER.

5.1. Постановка задачи.

5.2. Задание.

6. Вывод.

1. Використання символьних функцій. 1.1. Постановка завдання. Написати програму з допомогою символьних функцій в обробці тексту. Вважати, що у заданому тексті слова розділені одним прогалиною. Підрахувати у питальних пропозицій у заданому тексті і у слів у кожному з цих предложений.

1.2. Умовні позначення. A$ - ім'я символьній перемінної для записи заданого тексту. N — змінна для записи кількості символів з тексту A$. В$(N) — масив для записи символів, із яких складається текст A$. C (N) — масив для записи номери позиції, яким у тексті перебуває символ «.» S (N) — номери позиції, де з тексту A$ перебуває символ "? «. D (N) — масив значень, кількості символів у кожному з пропозицій, з яких тільки текст. R$(N, N) — масив для записи символів, із яких складається кожне пропозицію. K — змінна для записи кількості «?» з тексту A$. T — змінна для записи кількості «.» з тексту A$. F (N) — масив для записи кількості прогалин кожного окремого пропозиції. C$(N) — масив для записи кожного пропозиції на окрему осередок. B — змінна для підрахунку кількості прогалин у кожному пропозиції отдельно.

1.3. Блок-схема алгоритму рішення задачи.

| |початок | | | | | | | |A$ | | | | | | | |N = LEN (A$) | | | | | | |опис масивів B$(N), C (N), S (N), D (N), | |R$(N, N), E (N), C$(N) | | | | | | |I=1, N | | | | | | | |B$(I)=MID$(A$, | | | |I, 1) | | | | | | | |K = 0, T = 0 | | | | | | | |I = 1, N | | | | | | | |B$(I) = «? «| | | | | | | |K = K + 1 | | | |S (K) = I | | | | | | | |B$(I) = «. «| | | | | | | |T = T + 1 | | | |C (T) = I | | | | | | | |C (1) > S (1) | | | | | | |C$(1) = MID$(A$, 1, S (1)) | | | | | |C$(1) = MID$(A$, C (1), S (1) — C (1)) | | | | | | |I = 2, K | | | | | | | |C (I) > S (I) | | | | | | |C$(I) = MID$(A$, S (I — 1), S (I) — S (I — 1)) | | | | | |C$(I) = MID$(A$, C (I), S (I) — C (I)) | | | | | | |I = 1, K | | | | | | | |D (I) = | | | |LEN (C$(I)) | | | | | | | |I = 1, K | | | | | | | |J = 1, D (I) | | | | | | |R$(I, J) = MID$(C$(I), J, 1) | | | | | | |I = 1, K | | | | | | | |B = 0 | | | | | | | |J = 1, D (I) | | | | | | | |R$(I, J) = «» | | | | | | | |B = B + 1 | | | | | | | |C (1) > S (1) | | | | | | | |E (1) + 1 | | | | | | | |E (1) | | | | | | | |I = 2, K | | | | | | | |E (I) | | | | | | | |кінець | |.

1.4. Програма. CLS INPUT «Запровадьте текст »; A$ N = LEN (A$) DIM B$(N), C (N), S (N), D (N), R$(N, N), E (N), C$(N) FOR I = 1 TO N B$(I) = MID$(A$, I, 1) NEXT I FOR I = 1 TO N IF B$(I) = «? «THEN K = K + 1 S (K) = I END IF IF B$(I) = «. «THEN T = T + 1 C (T) = I END IF NEXT I IF C (1) > S (1) THEN C$(1) = MID$(A$, 1, S (1)) ELSE C$(1) = MID$(A$, C (1), S (1) — C (1)) END IF FOR I = 2 TO K IF C (I) > S (I) THEN C$(I) = MID$(A$, S (I — 1), S (I) — S (I — 1)) ELSE C$(I) = MID$(A$, C (I), S (I) — C (I)) END IF NEXT I FOR I = 1 TO K D (I) = LEN (C$(I)) NEXT I FOR I = 1 TO K FOR J = 1 TO D (I) R$(I, J) = MID$(C$(I), J, 1) NEXT J NEXT I FOR I = 1 TO K B = 0 FOR J = 1 TO D (I) IF R$(I, J) = «» THEN B = B + 1 END IF NEXT J E (I) = B NEXT I PRINT «Кількість питальних пропозицій одно »; K IF C (1) > S (1) THEN PRINT «Кількість cлов у 1-му запитальному пропозиції одно »; E (1) + 1 ELSE PRINT «Кількість слів у 1-му запитальному пропозиції одно »; E (1) END IF FOR I = 2 TO K PRINT «Кількість cлов в »; I; «-м запитальному пропозиції одно »; E (I) NEXT I END.

1.5. Контрольний приклад. Ви бачите високого людини в вікна? Це відомий актор. Ви цього хочете ознайомитися з ним? Я вам допоможу в этом.

Кількість питальних пропозицій одно 2.

Кількість слів у 1-му запитальному пропозиції одно 6.

Кількість слів 2-му запитальному пропозиції одно 5.

2. Рішення нелінійних рівнянь. 2.1. Постановка завдання. Скласти програму перебування кореня рівняння на відрізку [0; 0,8] методом половинного розподілу з точністю 0.1, 0.01, 0.001, 0.0001. tg x — 1/3 tg 3 x + 1/5 tg 5 x — 1/3 = 0.

Результати явити у таблиці наступного вида:

|Метод | | |Рівняння | | |Відтинок | | |Точність |Рішення (корінь рівняння) | |... | |.

2.2. Умовні позначення. N — розмірність масиву значень точності рішення. E (N) — масив значень точності рішення. X (N) — масив значень коренів рівняння з i-ой точністю. А — ім'я перемінної для записи лівої кордону відрізка. У — ім'я перемінної для записи правої кордону отрезка.

2.3. Блок-схема алгоритму рішення задачи.

| |початок | | | | | | | |A, B, N | | | | | | |опис масивів X (N), | |E (N) | | | | | | |I=1, N | | | | | | | |E (I) | | | | | | | |I=1, N | | | | | | | |A1 = A | | | |B1 = B | | | | | | |Y = TAN (A1) — 1 / 3 * | |TAN (A1) ^ 3 + 1 / 5 * | |TAN (A1) ^ 5 — 1/ 3 | | | | | |X (I) = (A1 + B1) / 2 | | | | | |Z = TAN (X (I)) — 1/ | |3*TAN (X (I))³ + 1/ 5 * | |TAN (X (I)) ^ 5 — 1/ 3 | | | | | | |Y * Z > 0| | | | | | | |A1 = X (I)| | | | | | | |B1 = X (I)| | | | | | |ABS (A1 — B1) > E (I) | | | | | | |I=1, N | | | | | | |X (I) B | | | | | |E (I); «Рішення у цьому | |інтервалі немає «| | | | | | |E (I); | | | |X (I) | | | | | | | |кінець | |.

2.4. Програма. CLS INPUT «Запровадьте ліву кордон відрізка »; A INPUT «Запровадьте праву кордон відрізка »; B INPUT «Запровадьте число значень точності «; N DIM E (N), X (N) FOR I = 1 TO N PRINT «Запровадьте »; I; «значення точності «INPUT E (I) NEXT I FOR I = 1 TO N A1 = A B1 = B M1: Y = TAN (A1) — 1 / 3 * TAN (A1) ^ 3 + 1 / 5 * TAN (A1) ^ 5 — 1 / 3.

X (I) = (A1 + B1) / 2.

Z = TAN (X (I)) — 1 / 3 * TAN (X (I)) ^ 3 + 1 / 5 * TAN (X (I)) ^ 5 — 1 / 3 IF Y * Z > 0 THEN.

A1 = X (I).

ELSE B1 = X (I).

END IF IF ABS (A1 — B1) > E (I) THEN GOTO M1 NEXT I CLS PRINT TAB (15); «Метод »; TAB (30); «половинного розподілу «PRINT TAB (15); «Рівняння »; TAB (30); «tg x — 1/3 tg (x)^3 + 1/5 tg (x)^5 — 1/3 = 0 «PRINT TAB (15); «Відтинок »; TAB (30); «[ «; A; «; «; B; «] «PRINT PRINT TAB (10); «Точність »; TAB (35); «Рішення (корінь рівняння) «PRINT FOR I = 1 TO N IF X (I) B THEN.

PRINT TAB (12); E (I); TAB (40); «Рішення у цьому інтервалі немає «ELSE.

PRINT TAB (12); E (I); TAB (40); X (I) END IF NEXT I END.

2.5. Результати рішення уравнения.

|Метод |методом половинного розподілу | |Рівняння |tg x — 1/3 tg 3 x + 1/5 tg 5 x — 1/3 | | |= 0 | |Відтинок |[0; 0,8] | | | | |Точність | Рішення (корінь рівняння) | |0.1 |3.437 500 | |0.01 |3.476 563 | |0.001 |3.475 586 | |0.0001 |3.474 792 |.

3. Обробка даних щоб одержати статистичних оцінок. 3.1. Постановка завдання. Написати програму введення і методи обробки даних. Розробити контрольний приклад, у якому щонайменше 5 значень. Вихідні дані й одержують результати розрахунку у вигляді таблицы.

|Обработка даних переписом населення| | | |Область, край |У| | | |жителе| | | |і | | |... | | | |математичне очікування | | | |дисперсія | | | |квадратическое відхилення | | | |коефіцієнт варіації | | | 3.2. Умовні позначення. Nу. A$(N) — масив областей, країв. Т (N) — масив значень кол-ва жителів i-ой області. M — ім'я перемінної для записи математичного очікування кол-ва жителів. D — ім'я перемінної для записи дисперсії кол-ва жителів. P. S — ім'я перемінної для записи квадратического відхилення кол-ва жителів. K — ім'я перемінної для записи коефіцієнта вариации.

3.3. Блок-схема алгоритму рішення задачи.

| | початок | | | | | | | |N | | | | | | | | | | |описаний| | | |не | | | |масив| | | |вв | | | |A$(N),| | | |Т (N) | | | | | | | | | I=1, | | | |N | | | | | | | | A$(I), | | | |Т (I) | | | | | | | | | | | |M=0 | | | | | | | | I=1, N| | | | | | | | M=M+Т (I)| | | | | | | | | | | | M=M/N | | | | | | | | D = 0 | | | | | | | | I=1, N | | | | | | | |D = D | | | |+(Т (I) | | | |-M) ^ 2 | | | | | | | | | | | | | | | |D=D/(N-1)| | | | | | | | S=SQR (D)| | | | | | | | K=S/M | | | | | | | | M, D, S, K| | | | | | | | кінець| |.

3.4. Програма. СLS INPUT «Запровадьте кількість областей, країв »; N DIM A$(N), Т (N) FOR I = 1 TO N PRINT «Запровадьте область, край »; I; «-x жителів» INPUT A$(I) PRINT «Запровадьте кількість жителів для » ;I; «-го краю «INPUT Т (I) NEXT I M = 0 FOR I = 1 TO N M = M + Т (I) NEXT I M = M / N D = 0 FOR I = 1 TO N D = D + (Т (I) — M) ^ 2 NEXT I D = D / (N — 1) P. S = SQR (D) K = P. S / M CLS PRINT TAB (15); «Обробка даних переписом населення «PRINT PRINT TAB (8); «Область, край »; TAB (40); «Кількість жителів «PRINT FOR I = 1 TO N PRINT TAB (5); A$(I); TAB (45); Т (I) NEXT I PRINT PRINT TAB (5); «Матюк. очікування »; TAB (45); M PRINT TAB (5); «Дисперсія »; TAB (45); D PRINT TAB (5); «Кв. відхилення »; TAB (45); P. S PRINT TAB (5); «Коэф. варіації «; TAB (45); K END.

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

|Обработка даних перепису| | |населення | | |Область, край |У жителів | |Володимирська |2300 | |Магаданська |1000 | |Тюменська |900 | |Московська |11 000 | |Івановська |3400 | | | | | | | |математичне очікування |3720 | |дисперсія |1.7617E+07 | |квадратическое отклонение|4197.261 | |коефіцієнт варіації |1.128 296 |.

4. Фундаментальна обізнаність із каталоги і файлами в MS-DOS. 4.1. Постановка задачи.

(ZOO (((HOME (CLASS1.

(SСOOL ((((CLASS2.

(UNIVER (CLASS3.

4.2. Завдання. 1) створення зазначеного дерева каталогів. A: > md ZOO A: > md HOME A: > md SСOOL A: > md UNIVER A: > cd SСOOL A: SCOOL > md CLASS1 A: SCOOL > md CLASS2 A: SCOOL > md CLASS3.

2) перейти до каталогу найнижчого рівня, переглянути її вміст. A: > cd SCOOL CLASS1 A: SCOOL CLASS1> dir Результат: Volume in drive A is DIANA Volume Serial Number is 1406−2E61 Directory of A: SCOOLCLASS1.

. 12/05/95 23:16. 12/05/95 23:16.

2 file (s) 0 bytes.

4 202 496 bytes free.

A:SCOOLCLASS1>

3)создать два текстових файла. A: SCOOLCLASS1> copy con t1. txt A: SCOOLCLASS1> copy con t2. txt Результат: A: SCOOLCLASS1>copy con t1. txt ми йдемо ^Z.

1 file (s) copied.

A:SCOOLCLASS1>copy con t2. txt вони прийшли ^Z.

1 file (s) copied.

A:SCOOLCLASS1>

4) вивести вміст файлів на екран. A: SCOOLCLASS1>TYPE T1. TXT A: SCOOLCLASS1>TYPE T2. TXT Результат: A: SCOOLCLASS1>TYPE T1. TXT ми йдемо A: SCOOLCLASS1>TYPE T2. TXT вони пришли.

5)объединить два текстових файла до одного. A: SCOOLCLASS1>COPY T1. TXT + T2. TXT T3.TXT Результат: A: SCOOLCLASS1>COPY T1. TXT + T2. TXT T3.TXT T1. TXT T2.TXT.

1 file (s) copied.

A:SCOOLCLASS1>

6) вивести вміст на екран. A: SCOOLCLASS1>TYPE T3. TXT Результат: A: SCOOLCLASS1>TYPE T3. TXT ми йдемо вони пришли.

A:SCOOLCLASS1>

7)переименовать об'єднаний файл. A: SCOOLCLASS1>REN T3. TXT T4.TXT Результат: A: SCOOLCLASS1>REN T3. TXT T4.TXT A: SCOOLCLASS1>

8) переглянути зміст каталогу. A: SCOOLCLASS1>DIR Результат: A: SCOOLCLASS1>DIR.

Volume in drive A is DIANA Volume Serial Number is 1406−2E61 Directory of A: SCOOLCLASS1.

. 12/05/95 23:16. 12/05/95 23:16 T1 TXT 9 12/05/95 23:54 T2 TXT 12 12/05/95 23:55 T4 TXT 22 13/05/95 0:19.

5 file (s) 43 bytes.

4 202 496 bytes free.

A:SCOOLCLASS1>

9) видалити файл. A: SCOOLCLASS1>DEL *.* Результат: A: SCOOLCLASS1>DEL *.* All files in directory will be deleted! Are you sure (Y/N)?Y.

A:SCOOLCLASS1>

10) послідовно видалити каталоги. A: SCOOLCLASS1>CD.. A: SCOOL>RD CLASS1 A: SCOOL> RD CLASS2 A: SCOOL> RD CLASS3 A: SCOOL > cd.. A: >RD ZOO A: >RD HOME A: >RD SCOOL A: >RD UNIVER.

5. Фундаментальна обізнаність із каталоги і файлами у системі NORTON COMMANDER. 5.1. Постановка задачи.

(ZOO (((HOME (CLASS1.

(SСOOL ((((CLASS2.

(UNIVER (CLASS3.

5.2. Завдання. 1) створити вказане дерево каталогів. a) натискаємо F7, набираємо ZOO, натискаємо Enter. б) натискаємо F7, набираємо HOME, натискаємо Enter. в) натискаємо F7, набираємо SСOOL, натискаємо Enter. р) натискаємо F7, набираємо UNIVER, натискаємо Enter. буд) підводимо курсор до SСOOL, натискаємо Enter, натискаємо F7, набираємо CLASS1 і натискаємо Enter. е) натискаємо F7, набираємо CLASS2, натискаємо Enter. ж) натискаємо F7, набираємо CLASS3, натискаємо Enter.

2) перейти до каталогу найнижчого рівня, подивитися його зміст. Підводимо курсор до CLASS1, натискаємо Enter, набираємо в командної рядку dir і натискаємо Enter.

3) створити два текстових файла. а) набираємо в командної рядку copy con t1. txt, натискаємо Enter, вводим.

Ira, натискаємо F6 і Enter. Результат: 1 file (s) copied б) набираємо в командної рядку copy con t2. txt, натискаємо Enter, вводим.

Natasha, натискаємо F6 і Enter. Результат: 1 file (s) copied.

4) вивести на екран вміст файлів. а) підводимо курсор до t1. txt і натискаємо F3. Результат: Ira б) натискаємо Esc, підводимо курсор до t2. txt і натискаємо F3. Результат: Natasha.

5) об'єднати два файла до одного. Натискаємо Esc, набираємо в командної рядку сopy t1. txt + t2. txt t3.txt і натискаємо Enter. Результат: t1. txt t2.txt.

1 file (s) copied.

6) вивести на екран вміст цього файла. Підводимо курсор до t3. txt і натискаємо F3. Результат: Ira Natasha.

7) перейменувати об'єднаний файл. Натискаємо Esc, F6 і набираємо t4. txt, натискаємо Enter.

8) подивитися його вміст. Підводимо курсор до t4. txt і натискаємо F3. Результат: Ira Natasha.

9) видалити створені файли. а) натискаємо Esc, відзначаємо клавіш INS t1. txt, t2. txt і t4. txt і нажимаем.

F8.

10) видалити каталоги. а) відзначаємо клавіш INS ZOO, HOME, SСOOL, UNIVER, натискаємо Enter, видаляємо дерево каталогов.

6. Висновок. Завдяки лекційному частини курсу отримано навички, які потім були застосовані під час роботи над практикою, такі, як: роботу з каталоги і файлами в системах MS-DOS і Norton Commander; складання блок-схем алгоритмів розв’язання різноманітних завдань; написання програм мовою QBASIC з використанням масивів, циклів, операторів умовного і безумовної переходу. Завдання практики дозволили реалізувати й вдосконалити отримані теоретичні знання, застосувати їх до вирішення конкретних завдань: використання символьних функцій в обробці тексту; роботу з системами MS-DOS і Norton Commander; рішення нелінійних рівнянь різними методами з різними початковим наближенням і різними ступенями точності; обробка таблиць та об'єктивності даних щоб одержати статистичних оцінок. Практична частина курсу дозволила переважно опанувати зазначеними навыками.