Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
КР по ОАИП.doc
Скачиваний:
0
Добавлен:
01.05.2025
Размер:
247.81 Кб
Скачать

Вариант 17

Задание №1. С помощью какого условного выражения можно определить попадает ли точка с координатами (x,y) внутрь прямоугольника с координатами левого верхнего угла (2,10), правого нижнего угла (8, 3):

  1. If (x>2) or (x<8) or (y<10) or (y>3) then write(‘попадает’);

  2. If (x>2) and (x<8) or (y<10) and (y>3) then write(‘попадает’);

  3. If (x>2) or (x<8) and (y<10) or (y>3) then write(‘попадает’);

  4. If (x>2) and (x<8) and (y<10) and (y>3) then write(‘попадает’).

Задание №2. Что будет выведено на экран в результате выполнения следующей программы? (Известно, что код символа d равен 100)

Var d:char;

Begin

d:=’5’;

writeln(d);

writeln(‘d’);

Writeln(char(ord(‘d’)),’ ‘,pred(d));

End.

Задание №3. Какие значения примут переменные с и d после выполнения следующего фрагмента программы:

c:=1;  d:=1; while с<=5 do

begin

d:=d*c;

c:=c+1;

end;

Задание №4. Какое значение примет переменная А после выполнения следующего фрагмента программы:

А:=1; b:= 3;

repeat А:=А+b;

b:=b*(-2); until (A>5);

Задание №5. Какое значение примет переменная А после выполнения следующего фрагмента программы.

A:=1;

for i:=3 to 5 do А:=A*i;

until b;

Задание №6. С одномерным массивом, состоящим из n вещественных элементов, выполнить следующее: Преобразовать массив таким образом, чтобы сначала располагались все элементы, целая часть которых не превышает 1, а потом – все остальные.

Задание №7. Разработать схему алгоритма для подсчета количества отрицательных чисел среди целых чисел a, b, c. Протестировать алгоритм для всех возможных случаев (ко-гда количество отрицательных чисел равно 0, 1, 2 и 3.

Задание №8. Составьте программу, вставляющую после буквы Н ещё одну букву H, если перед ней нет буквы А.

Задание №9. Из множества целых чисел от 1 до 30 выделить множество четных чисел.

Задание №10. Выполняется по инструкции, которая прилагается.

Создать нетекстовый файл berd.dat, содержащий информацию о птицах (название, регион обитания, максимальный размер). Переписать в текстовый файл информацию о сибирских птицах, упорядоченную в алфавитном порядке. Вывести на экран названия самой маленькой и самой большой птицы.

Вариант 18

Задание №1. С помощью какого условного выражения можно определить, что точка с координатами (x,y) не попадает внутрь прямоугольника с координатами левого верхнего угла (2,10), правого нижнего угла (8, 3):

1) If (x<=2) or (x>=8) or (y>=10) or (y<=3) then write(‘не попадает’);

2) If ((x<=2) and (x>=8)) or ((y>=10) and (y<=3)) then write(‘не попадает’);

3) If ((x<=2) or (x>=8)) and ((y>=10) or (y<=3)) then write(‘не попадает’);

4) If (x<=2) and (x>=8) and (y>=10) and (y<=3) then write(‘не попадает’).

Задание №2. Что будет выведено на экран в результате выполнения следующей программы. (Известно, что код символа e равен 101):

Var e:char;

Begin

e:=’T’;

writeln(e);

writeln(‘e’);

Writeln(char(ord(e)),’ ‘,pred(‘e’));

End.

Задание №3. Какие значения примут переменные с и d после выполнения следующего фрагмента программы:

c:=0;  d:=100; while (с<5) and (d>10) do

begin

c:=c+1;

d:=d div 2;

end;

Задание №4. Какое значение примет переменная А после выполнения следующего фрагмента программы:

А:=1; b:= 3;

repeat А:=А+b;

b:=b*(-2); until (b>10);

Задание №5. Какое значение примет переменная А после выполнения следующего фрагмента программы:

A:=0; x:=0;

for i:=1 to 5 do

begin

x:=x+0.1;

А:=A+x;

end;

Задание №6. С одномерным массивом, состоящим из n вещественных элементов, выполнить следующее: Преобразовать массив таким образом, чтобы сначала располагались все элементы, отличающиеся от максимального не более чем на 20%, а потом – все остальные.

Задание №7. Написать программу, которая выводит пример на умножение двух однозначных чисел, запрашивает ответ пользователя, проверяет его и выводит сообщение «Правильно!» или «Вы ошиблись» и правильный результат.

Например: Сколько будет 6*7? Введите ответ и нажмите <Enter> ? 56 Вы ошиблись. 6*7 = 42.

Задание №8. Слово или строка являются палиндромом, если слева направо и справа налево они читаются одинаково. Например: ‘кабак’, ‘боб’, ‘asdfggf dsa. Составьте алгоритм и напишите программу, определяющую, является ли строка или слово палиндромом.

Задание №9. Даны два множества A и В. Постройте из них следующее множество: (A+В) - (A - В) - (В - A).

Задание №10. Выполняется по инструкции, которая прилагается.

Создать нетекстовый файл sport.dat, содержащий информацию о спортсменах, участвовавших в олимпиаде (фамилия, страна, вид спорта, занятое место). Переписать в текстовый файл информацию о российских спортсменах, упорядоченную в порядке убывания занятых мест. Ввести на экран название страны и вывести фамилии спортсменов из этой страны. Вывести в отдельный файл названия стран и фамилии спортсменов, занявших призовые места.

Методические рекомендации по выполнению задания 10

  • Для осуществления итоговой работы предлагается выполнение индивидуального проекта с последующей защитой. Для выполнения работы потребуются знания о работе с циклами, массивами, строками, записями и файлами, умение составлять алгоритмы и использовать подпрограммы. Каждое задание содержит несколько подзадач, которые должны быть выполнены в комплексе. В результате выполнения проекта должно быть получено несколько файлов.

  • Первый файл с программой создания файла, содержащего информацию о чем-либо, должен называться f1.pas. Для представления информации используйте записи. Созданный файл должен содержать не менее 10 записей. Информация, записываемая в файл, вводится с клавиатуры.

  • Второй файл – созданный файл с расширениями .dat или .txt, если имя файла не указано в задании, то оно должно запрашиваться у пользователя.

  • Третий файл f2.pas – файл с основной программой. В программе выполняется считывание информации из файла и ее обработка в соответствии с заданием. Если требуется упорядочить информацию, используйте сортировку, оформив ее в виде отдельной процедуры. При упорядочивании в алфавитном порядке, когда сортировка ведется по строкам, применяйте операции сравнения строк. Если в задании требуется определить самый большой, самый маленький, самый старый и так далее элемент, то задача сводится к поиску максимального или минимального элемента. Необходимо оформить поиск в виде функции, результатом работы которой будет номер искомого элемента. В программе должны присутствовать подробные комментарии об используемых переменных и выполняемых действиях.

  • Четвертый файл – выходной текстовый файл, содержит итоговую требуемую информацию. В некоторых заданиях требуется получить несколько выходных файлов.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]