Реферат: Основы ПЭВМ
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