Интегрированная среда Turbo Pascal. Функциональные клавиши Турбо Паскаль



Скачать 449.08 Kb.
страница4/5
Дата09.07.2014
Размер449.08 Kb.
ТипДокументы
1   2   3   4   5

2а. Печать матрицы на экран :

For i:=1 to n do begin

For j:=1 to m do Write (A[i,j]); {Вывод эл-тов одной строки матрицы}

Writeln; { переход на следующую строку экрана}

end;

где А - имя массива;i - индекс строки;j - индекс столбца;

n - количество элементов в строке;m - количество элементов в столбце.

2б. Печать 3-й строки на экран :

For i:=1 to n do Write (A[3,i],’ ‘); {Вывод эл-тов одной строки матрицы}

end;

3а. Вычисление суммы элементов 2-той строки.

s:=0;

For i:=1 to n do s:=s+a[2,i];

Writeln(‘Сумма элементов 2-й строки = ’,s);

3б. Вычисление суммы элементов 2-го столбца.

s:=0;

For i:=1 to n do s:=s+a[i,2];

Writeln(‘Сумма элементов 2-го столбца = ’,s);

5.Вычисление суммы элементов всего двумерного массива.

S:=0;

for i:=1 to m do

for j:=0 to n do S:=S+a[i,j];

6. Задача поиска максимального (минимального) элемента и его индексов.

Ищем максимальный элемент каждой строки :

For i:=0 to m do

begin

max:=a[i,1];

ind_L:=i; {сохраняем номер строки}

ind_C:=1; {заносим номер 1 - первый столбец}

for j:=1 to n do

if a[i,j]>max then begin

max:=a[i,j];

ind_C:=j {сохраняем номер j-ого столбца}

end;

writeln(‘max строки ’,i,’=’,max)

end;

7. Алгоритм поиска минимального элемента и его индексов для всего массива.

Min:=a[1,1];

ind_L:=1;

ind_C:=1;

for i:=1 to m do

for j:=1 to n do

if a[i,j]
min:=a[i,j]; ind_L:=i; ind_C:=j;

end;

Квадратные матрицы.

Type mas4x4=array[1..4,1..
4] of integer;

var a: mas4x4;


a11

a12

a13

a14

a21

a22

a23

a24

a31

a32

a33

a34

a41

a42

a43

a44







a12

a13

a14







a23

a24










a34




























a21










a31

a32







a41

a42

a43






Главная диагональ - элементы a11, a22, a33, a44 (индексы элементов, расположенных на главной диагонали (i=j)

Побочная диагональ - элементы a41, a32, a23, a14 (сумма индексов элементов на 1 больше размерности строки (или столбца), т.е. i+j=4+1 или i+j=n+1. На рисунке главная диагональ закрашена сплошным серым цветом, побочная - черным.

Элементы, расположенные над главной диагональю, Для индексов элементов, расположенных над главной диагональю выполняется отношение i<j;

Элементы, расположенные под главной диагональю, Для индексов элементов, расположенных под главной диагональю выполняется отношение i>j;
Примеры :

1) Найти сумму элементов главной диагонали:

S:=0;

for i:=1 to n do S:=S+a[i,i];

2) Найти минимальный элемент побочной диагонали:

min:=a[1,n];

for i:=1 to n do

if a[i,n+1-i]
Задачи по двумерным массивам

  1. Дан двумерный массив целых чисел. Составить программу :

    1. вывода на экран элемента, расположенного в правом верхнем углу массива;

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

    3. вывода на экран любого элемента второй строки массива;

    4. вывода на экран любого элемента третьего столбца массива;

    5. вывода на экран любого элемента массива.

  2. Дан двухмерный целочисленный массив. Поменять местами :

    1. элементы, расположенные в верхнем правом и нижнем левом углах;

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

  3. Известен номер строки, на которой расположен элемент главной диагонали двумерного массива целых чисел. Вывести на экран значение этого элемента.

  4. Вывести на экран (в одну строку) :

    1. все элементы главной диагонали массива

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

  5. Заменить значения всех элементов главной диагонали целочисленного массива на нулевые.

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

  7. Определить:

    1. сумму элементов главной диагонали массива;

    2. сумму элементов побочной диагонали массива;

    3. среднее арифметическое элементов главной диагонали массива;

    4. среднее арифметическое элементов побочной диагонали массива;

    5. минимальный (максимальный) элемент главной диагонали массива;

    6. максимальный (минимальный) элемент побочной диагонали вещественного массива;

    7. координаты первого максимального элемента главной диагонали;

    8. координаты первого минимального элемента главной диагонали.

  8. Дан двумерный массив вещественных чисел .

    1. вывести на экран все элементы пятой строки массива;

    2. вывести на экран все элементы третьей строки массива, начиная с последнего элемента этой строки;

    3. вывести на экран все элементы s-го столбца массива;

    4. заменить значения всех элементов второй строки массива на число 5;

    5. заменить значения всех элементов пятого столбца на число 10.

    6. определить максимальный (минимальный) элемент третьего столбца;

  9. Дан двухмерный массив целых чисел. Составить программу :

    1. расчета произведения двух любых элементов любой строки массива

    2. сумму всех элементов любой строки массива;

  10. Дан двумерный массив целых чисел. Определить :

    1. а) в каком столбце массива сумма элементов меньше, в первом или в последнем;

    2. б) в какой строке произведение элементов больше, во второй или в третьей.

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

    1. расположенную выше главной диагонали;

    2. расположенную ниже главной диагонали;

    3. расположенную выше побочной диагонали;

    4. расположенную ниже побочной диагонали;

  12. Дан двумерный массив целых чисел :

    1. в каждом его столбце найти максимальный (минимальный) элемент;

    2. координаты максимального (минимального) элемента;

    3. сумму нечетных элементов в каждом столбце (строке);

    4. количество элементов кратных А или В.

    5. найти строку с максимальной суммой элементов;

    6. найти столбец с минимальной суммой элементов.

  13. Даны два двумерных вещественных массива одинаковых размеров.

    1. создать третий массив такого же размера, каждый элемент которого равен сумме соответствующих элементов двух первых массивов.

    2. создать третий массив такого же размера, каждый элемент которого равен 100, если соответствующие элементы двух первых массивов имеют одинаковый знак, и равен нулю в противном случае.

  14. Дан двухмерный целочисленный массив размером nxn.

    1. все его элементы, кратные трем, записать в одномерный массив.

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

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

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

  15. Дан двумерный массив из четного числа столбцов. Поменять местами первый со вторым, третий - с четвертым и т.д.



Строки.

Последовательность символов называют строкой.

Переменная типа string должна быть объявлена в разделе описания переменных так:

Имя: string; или Имя: string[длина];

где Имя – имя переменной; string – ключевое слово обозначения строкового типа; длина – константа типа integer, определяющая максимальную длину последовательности символов, которая может быть присвоена переменной.

Примеры: name: string [30];

s: string;

Если при объявлении переменной длина не указывается, то предполагается что длина строки равняется 255 символам, т.е. объявления s: string; и s:string[255]; эквивалентны.

В тексте программы последовательность символов, являющаяся строкой, заключается в одинартные кавычки. Например, чтобы присвоить строковой переменной parol значение, нужно записать:

parol:=’большой секрет’; или parol:=’2010’;

Утверждение parol:=2010; приведет к ошибке при компиляции, так как тип переменной не соответствует типу константы.

Переменную типа string можно сравнивать с другой переменной или константой типа string, используя операторы =, <, >, <=, >=, <>. Строки сравниваются посимвольно от первого символа. Если все символы сравниваемых строк одинаковые, то такие строки считаются равными. Если в одинаковых позициях строк находятся разные символы, большей считается та строка, у которой в этой позиции находится символ с большим кодом. Например: Иванов – 1 строка, Иванов – 2 строка, тогда они равны; васильев – 1 строка, Васильев – 2 строка, тогда 1 строка больше 2; Алексеев – 1 строка, петров – 2 строка, тогда 1 строка меньше 2; Иванова – 1 строка, Иванов – 2 строка , тогда 1 строка больше 2.

Кроме операций сравнения к строковым переменным и константам можно применить оператор сложения, в результате выполнения которого получается новая строка, полученная склеиванием двух или более строк. Например: name:=’Иван’;

fam:=’Иванов’;

fn:= fam +’ ‘+name;

переменная fn получит значение ’Иванов Иван’.

Задачи:

  1. Составить программу:

    1. которая запрашивает имя человека и повторяет его на экране с приветствием;

    2. которая запрашивает название футбольной команды и повторяет его на экране со словами: "Это чемпион!".

  2. Составить программу, которая запрашивает отдельно имя и отдельно фамилию, а затем выводит их как одну символьную строку.

Строковые функции

Функция length.

Функция length возвращает длину строки. У функции один параметр – переменная строкового типа. Возвращаемое значение функции (целое число) – количество символов, из которых состоит строка, без учета начальных и завершающих пробелов. Например length(’Иванов’) равно 6, а значение length(’ Невский проспект ’) равно 16, так как при вычислении длины строки функция не учитывает начальные и завершающие пробелы.

Примеры определения длины строки

  • k:=length(‘мир’); k=3

  • s:=‘Кот и пес’; n:= length(s); n=9

  • s1=‘’; i:= length(s1); i=0 ‘’ - пустая строка!

Задачи:

  1. Дано название футбольного клуба. Определить количество символов в нем.

  2. Дано название города. Определить четно или нет количество символов в нем.

  3. Даны две фамилии. Определить какая из них длиннее.

Функция copy.

Функция copy позволяет выделить фрагмент строки. В общем виде обращение к функции copy выглядит так: (строка, p, n);

где строка – переменная строкового типа, содержащая строку, фрагмент которой надо получить; p – номер первого символа в строке строка, с которого начинается выделяемая подстрока; n – длина выделяемой подстроки. Например, в результате выполнения команд:

s:= ‘Инженер Иванов’;

fam:= copy (s, 9, 6);

значением переменной fam будет строка ‘Иванов’.

Примеры выделения символов

  • s:=‘информатика’;

s1:=copy (s, 3, 5); s1=‘форма’

s2:=copy (s, 8, 2)+ copy (s, 3, 1); s2=‘тиф’

Задачи:

  1. Дано слово. Получить его часть, образованную второй, третьей и четвертыми буквами.

  2. Дано слово, состоящее из четного числа букв. Вывести на экран его первую половину, не используя оператор цикла.

  3. Дано слово. Получить его часть, образованную идущими подряд буквами, начиная с m-й и кончая n-й.

  4. Из слова "яблоко" путем вырезок его букв получить слова "блок" и "око".

Процедура insert.

Процедура insert позволяет добавить часть строки в исходную строку. В общем виде обращение к процедуре выглядит так: Insert ( подстрока, строка, p);

где подстрока – строковая константа или переменная, которую необходимо добавить в строковую переменную строка; p – номер первого символа в строке строка, с которого начинается добавление подстроки.

Примеры вставки символов

  • s:=‘мама’;

insert (‘очк’, s, 4); s=‘мамочка’

  • s1:=‘рог’;

s2:=‘по’;

insert (s1, s2, 3); s2=‘порог’

Задачи:

  1. Дано слово. Вставить букву "т" после k-й буквы.

  2. Дано слово. Вставить заданную букву после первой буквы "и".

  3. Дано слово. Переставить его первую букву на место последней. При этом вторую, третью, ..., последнюю буквы сдвинуть влево на одну позицию.
1   2   3   4   5

Похожие:

Интегрированная среда Turbo Pascal. Функциональные клавиши Турбо Паскаль iconРабота в системе турбо паскаль (ТП)
Яп паскаль был разработан Н. Виртом в 1968 – 1970году и получил широкое распространение благодаря наглядности программ и легкости...
Интегрированная среда Turbo Pascal. Функциональные клавиши Турбо Паскаль iconПрограммирование на процедурном языке высокого уровня(Turbo Pascal)
Паскаль постоянно совершенствовался, и сегодня его наиболее полно представляют версии Turbo Pascal 0, Borland Pascal 0, а также Object...
Интегрированная среда Turbo Pascal. Функциональные клавиши Турбо Паскаль iconУрок n 17 Основы программирования на языке Turbo Pascal
Паскаль (Pascal)- учебный инструментальный язык программирования вычислительных машин и персональных компьютеров. На современных...
Интегрированная среда Turbo Pascal. Функциональные клавиши Турбо Паскаль iconИнтегрированная среда программирования Turbo Pascal Язык программирования Pascal
Блеза Паскаля. Первоначально этот язык был создан для обучения программированию. Однако благодаря заложенным в нем большим возможностям...
Интегрированная среда Turbo Pascal. Функциональные клавиши Турбо Паскаль iconОсновные понятия языка паскаль
Алфавит языка Паскаль. Под алфавитом понимается упорядоченная определенным образом совокупность взаимно различимых знаков — символов....
Интегрированная среда Turbo Pascal. Функциональные клавиши Турбо Паскаль iconДанные логического, символьного и строкового типа в Turbo Pascal. Библиотека (модуль) crt и Graph. Работа с файлами в Turbo Pascal. Построение графиков функций. Численные методы
Логический тип переменных называется булевым. Он основан на ма- тематической логике, в которой применяются две константы: 1 ис
Интегрированная среда Turbo Pascal. Функциональные клавиши Турбо Паскаль iconКраткая теория по курсу информатика Типы данных языка программирования Turbo Pascal
В языке программирования Turbo Pascal все данные, используемые программой должны принадлежать к какому-либо типу данных. Некоторые...
Интегрированная среда Turbo Pascal. Функциональные клавиши Турбо Паскаль iconI основы языка высокого уровня турбо pascal алфавит языка Pascal
Прописные и строчные буквы Pascal'eм не различаются. Знаки «возведение в степень» и двойная кавычка в языке отсутствуют
Интегрированная среда Turbo Pascal. Функциональные клавиши Турбо Паскаль iconИнтегрированная среда программирования
Интегрированная среда программирования Delphi позволяет сравнительно легко и быстро создавать законченные приложе­ния Windows. Поэтому...
Интегрированная среда Turbo Pascal. Функциональные клавиши Турбо Паскаль icon"Среда программирования Turbo Pascal "
Развивающая: развитие алгоритмического мышления, навыков работы на компьютере, познавательных интересов, памяти, внимания, самостоятельности...
Разместите кнопку на своём сайте:
ru.convdocs.org


База данных защищена авторским правом ©ru.convdocs.org 2016
обратиться к администрации
ru.convdocs.org