Решенные задачи из лабораторных работ №1, 2,
3. Алгоритмизация и программирование. Pascal. 5 курс. Специальность информационные технологии в культуре. Преподаватели Зезюля (Зязюля), Гляков
Белорусский государственный университет культуры и искусств (БГУКИ), г. Минск, 2015. В архиве 4 Word файла: 3 - задания, 1 - решение Лабораторная работа №1
Задача
1. Дан массив действительных чисел А размерности n×m (1≤n≤10, 1≤m≤10). Составьте программу, которая будет находить максимальный элемент в нем, а также номер строки и номер столбца, в котором этот элемент расположен.
Ввод исходных данных организуйте следующим образом:
n m
а11 а12 а13 . . . а1m
а21 а22 а23 . . . а2m
а31 а32 а33 . . . а3m
. . . . . . . . . . . . . . . .
аn1 аn2 аn3 . . . аnm
Результат выведите следующим образом:
aij i j (где aij – максимальный элемент, i и j – номер строки и столбца соответственно, где максимальный элемент расположен). Задача
2. Разработайте программу, которая в массиве целых чисел А размерности n будет переставлять элементы так, чтобы вначале будут разместились отрицательные элементы, а затем – неотрицательные. Размерность n (1≤n≤10) массива А и значения его элементов введите с клавиатуры. На экран в первой строке выведите исходный массив, во второй строке – массив, полученный в результате перестановки элементов.
Работоспособность программы проверьте для следующих наборов исходных данных: 1) n=1, А=(5); 2) n=10, А=(0; -5; 3; 0; 10; -8; 6; 12; -4; 7). Задача
3. Дан массив целых чисел А размерности n (1≤n≤10). Составьте программу, которая будет находить все различные числа в нем и подсчитывать, сколько раз каждое из этих чисел встречается в массиве. Ввод исходных данных организуйте следующим образом:
1-я строка: n;
2-я строка: а1 а2 а3 . . . аn .
Результат выведите следующим образом:
m (m – найденное количество различных чисел)
Различные числа
b1 b2 b3 . . . bm
Частота чисел
k1 k2 k3 . . . km
При разработке программы используйте алгоритм быстрого последовательного поиска. Лабораторная работа №2Задача. Решите рассмотренную выше задачу с использованием конструкции цикла WHILE … DO, вместо конструкции REPEAT … UNTIL.
Наберите в ТП текст программы, приведенной ниже. Исполните ее на компьютере при нескольких наборах входных данных. Выясните, что делает эта программа. PROGRAM FIB;
VAR n,i,F1,F2,F: INTEGER;
BEGIN
ReadLn(n);
IF n=1
THEN F:=0
ELSE IF n=2
THEN F:=1
ELSE
BEGIN
F1:=0; F2:=1; i:=2;
WHILE i n DO
BEGIN
F:=F1+F2; F1:=F2; F2:=F; i:=i+1;
END;
END;
WriteLn('n = ', n, ' Fib = ', F);
END. Лабораторная работа 3 Для описания символьных переменных используется тип CHAR. Символьным переменным можно присваивать значения символа. Их можно сравнивать друг с другом или с символом. При сравнении символов сравниваются их ASCII-коды. Считается, что один символ больше другого только в том случае, если он имеет больший ASCII-код. Например, 'A' меньше 'B', поскольку ASCII-код символа 'A' равен 65, а ASCII-код символа 'B' равен
66. В таблице, приведенной ниже, перечислены функции, которые могут применяться при работе с символами.
3. Алгоритмизация и программирование. Pascal. 5 курс. Специальность информационные технологии в культуре. Преподаватели Зезюля (Зязюля), Гляков
Белорусский государственный университет культуры и искусств (БГУКИ), г. Минск, 2015. В архиве 4 Word файла: 3 - задания, 1 - решение Лабораторная работа №1
Задача
1. Дан массив действительных чисел А размерности n×m (1≤n≤10, 1≤m≤10). Составьте программу, которая будет находить максимальный элемент в нем, а также номер строки и номер столбца, в котором этот элемент расположен.
Ввод исходных данных организуйте следующим образом:
n m
а11 а12 а13 . . . а1m
а21 а22 а23 . . . а2m
а31 а32 а33 . . . а3m
. . . . . . . . . . . . . . . .
аn1 аn2 аn3 . . . аnm
Результат выведите следующим образом:
aij i j (где aij – максимальный элемент, i и j – номер строки и столбца соответственно, где максимальный элемент расположен). Задача
2. Разработайте программу, которая в массиве целых чисел А размерности n будет переставлять элементы так, чтобы вначале будут разместились отрицательные элементы, а затем – неотрицательные. Размерность n (1≤n≤10) массива А и значения его элементов введите с клавиатуры. На экран в первой строке выведите исходный массив, во второй строке – массив, полученный в результате перестановки элементов.
Работоспособность программы проверьте для следующих наборов исходных данных: 1) n=1, А=(5); 2) n=10, А=(0; -5; 3; 0; 10; -8; 6; 12; -4; 7). Задача
3. Дан массив целых чисел А размерности n (1≤n≤10). Составьте программу, которая будет находить все различные числа в нем и подсчитывать, сколько раз каждое из этих чисел встречается в массиве. Ввод исходных данных организуйте следующим образом:
1-я строка: n;
2-я строка: а1 а2 а3 . . . аn .
Результат выведите следующим образом:
m (m – найденное количество различных чисел)
Различные числа
b1 b2 b3 . . . bm
Частота чисел
k1 k2 k3 . . . km
При разработке программы используйте алгоритм быстрого последовательного поиска. Лабораторная работа №2Задача. Решите рассмотренную выше задачу с использованием конструкции цикла WHILE … DO, вместо конструкции REPEAT … UNTIL.
Наберите в ТП текст программы, приведенной ниже. Исполните ее на компьютере при нескольких наборах входных данных. Выясните, что делает эта программа. PROGRAM FIB;
VAR n,i,F1,F2,F: INTEGER;
BEGIN
ReadLn(n);
IF n=1
THEN F:=0
ELSE IF n=2
THEN F:=1
ELSE
BEGIN
F1:=0; F2:=1; i:=2;
WHILE i n DO
BEGIN
F:=F1+F2; F1:=F2; F2:=F; i:=i+1;
END;
END;
WriteLn('n = ', n, ' Fib = ', F);
END. Лабораторная работа 3 Для описания символьных переменных используется тип CHAR. Символьным переменным можно присваивать значения символа. Их можно сравнивать друг с другом или с символом. При сравнении символов сравниваются их ASCII-коды. Считается, что один символ больше другого только в том случае, если он имеет больший ASCII-код. Например, 'A' меньше 'B', поскольку ASCII-код символа 'A' равен 65, а ASCII-код символа 'B' равен
66. В таблице, приведенной ниже, перечислены функции, которые могут применяться при работе с символами.