Система программирования Турбо Паскаль. Воробьева А.П - 55 стр.

UptoLike

ВУЗ: 

НГАСУ «Сибстрин» | Новосибирск

Составители: 

Рубрика: 

111
Begin
writeln(‘Введите матрицу A’);
for i := 1 to 3 do
for j := 1 to 3 do read(a[i,j]);
writeln(‘Введите матрицу В’);
for i := 1 to 4 do
for j := 1 to 4 do read(b[i,j]);
L := SM(A, 3, C);
L := SM(B, 4, D);
writeln(‘Симметричная матрица C’);
for i := 1 to 3 do
begin
for j := 1 to 3 do write(c[i,j]:6:2);
writeln;
end;
writeln(‘Симметричная матрица D’);
for i := 1 to 4 do
begin
for j := 1 to 4 do write(d[i,j]:6:2);
writeln;
end;
End.
112
ГЛАВА 9. ТЕКСТОВЫЕ ДАННЫЕ
В системе Турбо Паскаль текстовая информация может быть
представлена двумя типами данных: символьным (
char) и стро-
ковым (
string).
9.1. Символьный тип данных
Значением данных символьного типа является любой символ
из набора всех символов компьютера. Каждому символу соответ-
ствует порядковый номер (код) в диапазоне 0..255. Для кодировки
символов первой половины диапазона (0..127) используется код
ASCII (американский стандартный код для обмена информацией).
Вторая половина символов с кодами 128..255 может быть различ-
ной. Для компьютеров фирмы IBM наиболее распространен
аль-
тернативный
вариант кодировки символов (см. приложение 2).
При написании программ символьные данные могут быть
представлены либо константами, либо переменными.
Символьная константа представляет собой одиночный
символ, заключенный в апострофы, например:
‘
Y’ ‘!’ ‘_’ ‘Д’
Символьная переменная объявляется в разделе описания
переменных, например:
Var
cr: char;
Во внутренней памяти компьютера каждый символ занимает
1 байт.
Ввод-вывод символьных данных
Для ввода символьных данных используется оператор
readln. Необходимо помнить, что нажатие любой небуквенной
клавиши ([
пробел], [Enter] и др.) будет значимым и восприни-
маться как символ.
Пример 1. Организовать ввод символьных переменных:
a=‘i’; b=‘j’; c=‘k’.
Var
a, b, c: char; 
Begin                                                         Г Л А ВА 9. Т Е КСТО В Ы Е   ДАННЫЕ
 writeln(‘Введите матрицу A’);
 for i := 1 to 3 do                                  В системе Турбо Паскаль текстовая информация может быть
     for j := 1 to 3 do read(a[i,j]);            представлена двумя типами данных: символьным (char) и стро-
 writeln(‘Введите матрицу В’);                   ковым (string).
 for i := 1 to 4 do
     for j := 1 to 4 do read(b[i,j]);                           9.1. Символьный тип данных
 L := SM(A, 3, C);
 L := SM(B, 4, D);                                    Значением данных символьного типа является любой символ
 writeln(‘Симметричная матрица C’);              из набора всех символов компьютера. Каждому символу соответ-
 for i := 1 to 3 do                              ствует порядковый номер (код) в диапазоне 0..255. Для кодировки
     begin                                       символов первой половины диапазона (0..127) используется код
         for j := 1 to 3 do write(c[i,j]:6:2);   ASCII (американский стандартный код для обмена информацией).
         writeln;                                Вторая половина символов с кодами 128..255 может быть различ-
     end;                                        ной. Для компьютеров фирмы IBM наиболее распространен аль-
 writeln(‘Симметричная матрица D’);              тернативный вариант кодировки символов (см. приложение 2).
 for i := 1 to 4 do
     begin                                            При написании программ символьные данные могут быть
         for j := 1 to 4 do write(d[i,j]:6:2);   представлены либо константами, либо переменными.
         writeln;                                     Символьная константа представляет собой одиночный
     end;                                        символ, заключенный в апострофы, например:
End.                                                                     ‘Y’     ‘! ’   ‘_’ ‘Д’
                                                      Символьная переменная объявляется в разделе описания
                                                 переменных, например:
                                                                             Var
                                                                                 cr: char;
                                                      Во внутренней памяти компьютера каждый символ занимает
                                                 1 байт.
                                                                   Ввод-вывод символьных данных
                                                      Для ввода символьных данных используется оператор
                                                 readln. Необходимо помнить, что нажатие любой небуквенной
                                                 клавиши ([пробел], [Enter] и др.) будет значимым и восприни-
                                                 маться как символ.
                                                      Пример 1. Организовать ввод символьных переменных:
                                                 a=‘i’; b=‘j’; c=‘k’.
                                                                           Var
                                                                             a, b, c: char;
                     111                                                       112

Страницы