Программа, методические указания и контрольные задания по курсу «основы программирования на языке паскаль» Для студентов бакалавриата направления 230400с заочной формы обучения
Вид материала | Программа |
СодержаниеПример выполнения задачи 3 Контрольная работа № 2 Задание 5. Организация сложных циклов Задания к задаче 5 |
- Рабочая программа методические указания контрольные задания для студентов специальности, 833.92kb.
- Низкотемпературных и пищевых технологий, 526.64kb.
- Методические указания и контрольные задания для студентов заочной формы обучения Составитель:, 672.87kb.
- Методические указания к практическим занятиям для студентов экономических специальностей, 560.21kb.
- Финанс ы методические указания и контрольные задания для студентов заочной формы обучения, 825.1kb.
- Программа, методические указания и контрольные задания по дисциплине концепции современного, 717.75kb.
- Программа, методические указания и контрольные задания по учебной дисциплине «риторика», 1732.52kb.
- Программа, методические указания и контрольные задания для студентов специальности, 1197.59kb.
- Методические указания и контрольные задания для студентов заочной формы обучения, специальность, 838.97kb.
- Общая химическая технология, 419.5kb.
Пример выполнения задачи 3
Дан массив А, содержащий 20 элементов целого типа – положительных и отрицательных. Сформировать массивы В и С, содержащие соответственно положительные и отрицательные элементы массива А. Найти сумму элементов массивов В и С и количество содержащихся в них элементов. Индексацию элементов заданного массива начать с –5. Для перебора элементов массива использовать оператор For.
Алгоритм
Программа
Program z3;
Var a: Array [-5..14] of Real;
b, c: Array [1..20] of Real;
i, bi, ci: Integer; s1, s2: Real;
Begin
For i:= -5 To 14 Do Read (a[i]);
s1:=0; s2:=0; bi:=0; ci:=0;
For i:= -5 To 14 Do
If a[i] > 0
Then Begin bi:=bi+1; b[bi]:=a[i] s1:= s1+b[bi] End
Else Begin ci:=ci+1; c[ci]:=a[i] s2:=s2+c[ci] End;
Writeln (bi, ’ положительных элементов:’ );
For i:= 1 To bi Do Write (b[i]); Writeln;
Writeln(’ их сумма равна’, s1);
Writeln (ci, ’ отрицательных элементов:’)
For i:= 1 To ci Do Write (c[i]); Writeln;
Writeln(’их сумма равна’, s2);
End.
КОНТРОЛЬНАЯ РАБОТА № 2
Составление алгоритмов решения задач и запись их в графической форме. Организация сложных циклов и подпрограмм на языке программирования Turbo Pascal. Изучение основных принципов работы с современными пакетами прикладных программ.
Задание 5. Организация сложных циклов
Составить схему алгоритма и программу циклического вычислительного процесса. Варианты задачи приведены в табл. 4. Ввод данных выполнить с помощью оператора For. Для реализации циклических процедур использовать операторы цикла, указанные в задании. Программу снабдить комментариями.
Задания к задаче 5
0. Перебор элементов исходной матрицы вести по строкам. Использовать два оператора For.
1. Перебор элементов исходной матрицы вести по столбцам. Использовать два оператора While.
2. Перебор элементов исходной матрицы вести по строкам. Использовать два оператора Repeat.
3. Перебор элементов исходной матрицы вести по столбцам. Использовать операторы For и While.
4. Перебор элементов исходной матрицы вести по строкам. Использовать операторы For и Repeat.
5. Перебор элементов исходной матрицы вести по столбцам. Использовать операторы While и Repeat.
6. Перебор элементов исходной матрицы вести по столбцам. Использовать два оператора For.
7. Перебор элементов исходной матрицы вести по строкам. Использовать два оператора While.
8. Перебор элементов исходной матрицы вести по столбцам. Использовать два оператора Repeat.
9. Перебор элементов исходной матрицы вести по строкам. Использовать операторы For и While.
Таблица 4
Номер варианта | Вариант |
1 | 2 |
0 | Дана целочисленная матрица D(45). Найти наибольший по модулю элемент матрицы и его местонахождение в ней (номер строки и столбца, на пересечении которых он расположен). |
1 | Дана матрица С(44), содержащая положительные и отрицательные числа. Вместо отрицательных элементов в матрицу записать нули, посчитать их количество. |
2 | Дана целочисленная матрица N(54). Найти наибольший и наименьший элементы. Вместо наибольшего элемента в матрицу записать наименьший, а вместо наименьшего – наибольший. |
3 | Дана матрица А(55), элементы которой суть целые числа. Сформировать вектор В, состоящий из элементов матрицы А, не лежащих на главной диагонали. |
4 | Дана матрица К(35), содержащая положительные, отрицательные числа и нули. Подсчитать количество положительных и количество отрицательных элементов матрицы. Вывести индексы нулевых элементов. |
5 | Дана целочисленная матрица А(44). Подсчитать сумму и количество четных чисел. |
6 | Дана матрица PS(35), содержащая положительные, отрицательные числа и нули. Вычислить сумму модулей отрицательных чисел и произведение положительных элементов матрицы, а также количество нулей. |
Окончание табл..4
1 | 2 |
7 | Дана целочисленная матрица W(44). Вычислить сумму ее элементов, лежащих ниже главной диагонали. |
8 | Дана матрица А(34). Сформировать вектор К, содержащий целые части отрицательных элементов матрицы А. Вычислить среднее арифметическое элементов вектора К. |
9 | Дана целочисленная матрица В(53), содержащая положительные и отрицательные элементы. Сформировать вектор С(5) (или С(3)) по следующим правилам:
Посчитать количество единиц в С. |