Вывод массива в виде таблицы

For i: =1 to n do

begin

for j: =1 to m do

write (a[i, j]);

writeln;

end;

Пример: Ввести двумерный вещественный массив, выполнить его транспонирование: поменять строки и столбцы местами. Осуществить контрольный вывод исходного массива и массива результатов. Результаты работы программы должны быть представлены в виде:

Введите количество строк и столбцов

2 2

Введите массив А

a(1, 1)=1

a(1, 2)=2

a(2, 1)=3

a(2, 2)=4

Массив A

1.0 2.0

3.0 4.0

Массив B

1.0 3.0

2.0 4.0

Рисунок 1.1 Блок-схема

program prim_11;

const row=10; col=10;

type

matr1=array[1..row, 1..col] of real;

matr2=array[1..col, 1..row] of real;

var

i, j, n, m: integer;

a: matr1; b: matr2;

begin

{ввод массива A}

writeln('Введите к-во строк и столбцов'); readln(n, m);

writeln('Введите массив А');

for i: =1 to n do

for j: =1 to m do

begin

write('a(', i: 1, ', ', j: 1, ')=');

readln(a[i, j]);

end;

{вывод массива A}

writeln('Массив A');

for i: =1 to n do

begin

for j: =1 to m do write(a[i, j]: 7: 1);

writeln;

end;

{формирование массива В}

for i: =1 to n do

for j: =1 to m do

b[j, i]: =a[i, j];

{вывод массива B}

writeln('Массив B');

for i: =1 to n do

begin

for j: =1 to m do write(b[i, j]: 7: 1);

writeln;

end;

readln;

end.

Практическая часть

Задание 1: Составить блок-схему алгоритма и программу с использованием цикла с предусловием или постусловием для вычисления и вывода на экран таблицы значений функции. Вывод выполнить в два столбика: первый столбик - значения аргумента, второй - значения функции. При разработке программы следует учитывать область определения функции и в случае необходимости организовать печать сообщения - “функция не определена”.

Таблица 1

Вар-т Функция нач.зн. кон.зн. шаг

____________________________________________________________________________

1. 0.1 1.25 0.1

2. 3 5.5 0.3

3. 0.5 3.75 0.5

4. -4 4.5 1

5. 0.1 1.25 0.1

6. 0.5 3.75 0.5

7. 3 5.5 0.3

8. 0.2 1.7 0.2

9. 0.3 3.7 0.4

10. 20 115 9

11. 0 2.2 0.4

12. -9.5 9.5 2.5

13. 0.5 3.75 0.5

14. -4 -2.5 0.2

15. -8 8 2.5

Задание 2: Составить программу с использованием цикла с параметрами. Предусмотреть задание исходных данных при помощи оператора ввода.

1. Написать программу, которая 10 раз выводит на экран имя и фамилию.

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

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

4. Написать программу, которая вычисляет сумму первых n целых положительных целых чисел. Количество суммируемых чисел должно вводиться во время работы программы.

5. Написать программу, которая вычисляет сумму первых n целых положительных четных чисел. Количество суммируемых чисел должно вводиться во время работы программы.

6. Написать программу, которая вычисляет сумму первых п членов ряда 1, 3, 5, 7, .... Количество суммируемых членов ряда задается во время работы программы.

7. Написать программу, которая вычисляет сумму первых n членов ряда

Количество суммируемых членов ряда задается во время работы программы.

8. Написать программу, которая выводит таблицу степеней двойки (от нулевой до десятой).

9. Написать программу, которая вычисляет факториал введенного с клавиатуры числа. (Факториалом числа n называется произведение целых чисел от 1 до n. Например, факториал 1 равен 1, 8 — 40320).

10. Написать программу, которая выводит таблицу значений функции у = -2, 4х²+5х-3 в диапазоне от -2 до 2 с шагом 0, 5.

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

12. Написать программу, которая вычисляет среднее арифметическое вводимой с клавиатуры последовательности дробных чисел. Количество чисел должно задаваться во время работы программы.

13. Написать программу, которая вводит с клавиатуры последовательность из пяти дробных чисел и после ввода каждого числа выводит среднее арифметическое полученной части последовательности.

14. Написать программу, которая вычисляет среднее арифметическое последовательности дробных чисел, вводимых с клавиатуры. После того, как будет введено последнее число, программа должна вывести минимальное и максимальное число последовательности. Количество чисел должно задаваться во время работы программы.

15. Написать программу, которая генерирует 10 случайных чисел в диапазоне от 1 до 10, выводит эти числа на экран и вычисляет их среднее арифметическое.

Задание 3

Дан одномерный массив. Найдите разность наибольшего и наименьшего чисел в этом массиве.
Даны два одномерных массива А и В. Подсчитайте количество тех i, для которых:

а) А[i] < B[i];

б) A[i] = B[i];

в) A[i] > B[i].

Составьте программу определения количества элементов массива, больших среднего арифметического всех его элементов.
Дан одномерный массив. Подсчитайте, сколько раз встречается в этой таблице максимальное по величине число.
Дан одномерный целочисленный массив. Составьте программу определения значения наибольшего элемента этого массива.
Дан одномерный целочисленный массив. Составьте программу определения индекса(-ов) минимального элемента массива.
Составьте программу, проверяющую упорядочены ли элементы одномерного массива по возрастанию.
Дан одномерный массив чисел. Определите сумму его элементов.
Дан одномерный массив чисел. Измените знаки всех его элементов на противоположные.
Дан одномерный массив чисел. Подсчитайте, сколько раз в нем встречается число 1.
Дан одномерный массив чисел. Подсчитать в нем количество элементов равных нулю, отрицательных элементов и положительных элементов.
В массиве А (m, n) найдите количество всех чисел, по модулю меньших заданного Т.

Задание 4

Удалить первый отрицательный элемент, если таковой имеется.
Удалить все отрицательные элементы.
Удалить все элементы, больше данного числа А (А вводить с клавиатуры).
Удалить все четные элементы, стоящие на нечетных местах.
Удалить все повторяющиеся элементы, оставив только их первые вхождения, то есть получить массив различных элементов.
Удалить последний четный элемент.
Удалить все элементы, меньше данного числа А (А вводить с клавиатуры).
Удалить все элементы, кратные 3.
Удалить все элементы, начиная с k1-го по k2-ой. Сделать проверку корректности ввода значений k1 и k2, если ввод некорректный, то вывести сообщение об ошибке и закончить работу.
Удалить все положительные элементы.

Задание 5

Вставить элемент после первого отрицательного элемента.
Вставить элемент перед отрицательным последним элементом.
Вставить два элемента: первый - после максимального элемента, второй - перед максимальным элементом.
Вставить по одному элементу перед всеми элементами, кратными заданному числу.
Вставить по одному элементу перед всеми отрицательными элементами.
Вставить два элемента: первый - после всех элементов, больших данного числа Р, а второй - перед всеми элементами, большими данного числа Р (Р вводить с клавиатуры).
Вставить число А перед всеми элементами, большими А, а число В - после всех элементов, меньших его.

Задание 6

Дан одномерный массив чисел а. Cформируйте такой массив b, который содержит копию положительных элементов массива а.
Скопируйте отрицательные и положительные кратные заданному числу элементы массива А в массив В в обратном порядке.
Из двух упорядоченных одномерных массивов (длины K и N) сформируйте одномерный массив размером K+N, упорядоченный так же, как исходные массивы.
Из двух упорядоченных одномерных массивов (длины K и N) сформируйте одномерный массив размером K+N, упорядоченный в обратную сторону.
Дан упорядоченный целочисленный массив. Сформировать второй массив всех таких различных значений, которые в первом массиве встречаются по два и более раза.
Дан упорядоченный целочисленный массив. Сформировать второй массив всех таких различных чисел, которые ни разу в первом массиве не встречаются и имеют величину больше минимального и меньше максимального из чисел первого массива.
Сформировать массив:

Y[1]=A[1]+A[n]

Y[2]= A[2]+A[n-1]

Y[3]= A[3]+A[n-2]

и т.д. (n - четное)

Даны два одномерных массива А и В. Подсчитайте количество тех i, для которых:

а) А[i] < B[i]

б) A[i] = B[i];

в) A[i] > B[i]

Даны два целочисленных массива одинаковой размерности. Получить третий массив той же размерности, каждый элемент которого равен большему из соответствующих элементов данного массива.
Определить величину максимальной разности между соответствующими элементами двух массивов и записать на то же место в третий массив той же размерности.
Даны два одномерных массива одинаковой длины. Получить третий массив такой же размерности, каждый элемент которого равен сумме соответствующих элементов данных массивов, умноженной на больший из них.

Задание 7: Составить программу для выполнения заданных действий над двумерным массивом вещественных чисел A(N, M). В программе предусмотреть ввод значений его элементов, вывод исходной и, при необходимости, преобразованной матриц.

1. Вычислить и запомнить сумму и число положительных элементов каждого столбца матрицы. Результаты отпечатать в виде двух строк.

2. Вычислить и запомнить сумму и число отрицательных элементов каждой строки матрицы. Результаты отпечатать в виде двух столбцов.

3. Вычислить сумму и число элементов матрицы, находящихся под главной диагональю и на ней.

4. Вычислить сумму и число элементов матрицы, находящихся над главной диагональю и на ней.

5. Записать на место отрицательных элементов матрицы нули, а на место положительных элементов матрицы — единицы.

6. Найти максимальный элемент на главной диагонали матрицы и присвоить нулевые значения другим элементам строки и столбца, на пересечении которых он стоит.

7. Найти наибольший и наименьший элементы матрицы и поменять их местами

8. Найти строку с наибольшей и наименьшей суммой элементов. Вывести на печать найденные строки и суммы их элементов.

9. Найти столбец с наибольшей и наименьшей суммой элементов. Вывести на печать найденные столбцы и суммы их элементов.

10. Каждый элемент строки разделить на предварительно рассчитанную сумму элементов этой строки.

11. Удалить последнюю строку матрицы и вывести ее на печать.

12. Удалить последний столбец матрицы и вывести ее на печать.

13. Найти максимальный элемент на главной диагонали матрицы.

14. Найти максимальный по модулю элемент матрицы и вычислить сумму столбца, в котором он находится.

15. Найти минимальный по модулю элемент матрицы и вычислить сумму строки, в которой он находится.

Задание 8:

1.Найти сумму всех четных элементов двумерного массива.

2.Найти сумму всех элементов двумерного массива, расположенных на главной диагонали.

3.Найти номер строки и столбца максимального элемента.

4.Имеется двумерный массив целых чисел. Найти номер строки, для которой среднеарифметическое значение ее элементов максимально.

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

6.Найти минимальный элемент среди максимальных элементов строк двумерного массива целых чисел. Определить номер строки и столбца такого элемента.

7.Удалить столбец двумерного массива целых чисел, в котором находится максимальный элемент этого массива.

8.Найти все неповторяющиеся элементы двумерного массива целых чисел.

9.Заполнить двумерный массив целыми числами от 1 до 100 по спирали.

10.В двумерном массиве целых чисел заменить все элементы, меньшие суммы элементов первой строки на эту сумму.

11.Отсортировать строки массива целых чисел по убыванию.

12.Отсортировать нечетные столбцы массива по возрастанию.

13. Ввести вещественную матрицу размерности n * m построчно, а вывести по столбцам.

14. Выяснить сколько положительных элементов содержит матрица размерности n * m, если a_ij = sin(i+j/2).

15. Дана квадратная вещественная матрица размерности n. Является ли матрица симметричной относительно главной диагонали.

⇐ Предыдущая 1 23