Завдання підвищеної складності

1. Зашифрувати уведену із клавіатури рядок, помінявши місцями перший символ із другим, третій із четвертим і т.д. Потім провести додаткову шифровку результату зсувом коду. Провести дешифрування.

2. Скласти процедуру створення текстового вікна, облямованого рамкою із псевдографічних символів. У параметри процедури ввести координати лівого верхнього кута, розміри й колір вікна, а також колір рамки.

3. Скласти програму, що організує переміщення текстового вікна 8х8 по екрані. Див. завдання 2. Рух починається по натисканню клавіші й закінчується або по натисканню клавіші, або при досягненні вікном краю екрана. Варіанти руху: а) з лівого верхнього кута в правий нижній кут. При неточному "влученні" у нижній кут зміщати вікно по одній зі сторін до точної зупинки в куті. б)з лівого нижнього кута в правий верхній. в) із центра екрана до однієї з бічних сторін. При досягненні краю розмір вікна по напрямку руху повинен зменшуватися до мінімального.

Лабораторна робота 6 Програмування з використанням безлічей

Теоретический материал

Справочник по процедурам и функциям

Ціль роботи: познайомити з поняттям "безліч" у мові програмування Pascal; виробити навички роботи зі структурою даних безліч.

Загальні відомості

Під безліччю розуміють обмежений, неупорядкований набір різних елементів одного типу. На відміну від масивів до елементів безлічі немає прямого доступу (по індексах цих елементів, як у масивах). Тому уведення-висновок безлічей виробляється з використанням операцій об'єднання (при уведенні) і перевірки приналежності (при висновку). Під потужністю безлічі розуміють кількість елементів, що втримуються в даній безлічі.

Перед виконанням роботи необхідно ознайомиться із правилами опису й використання змінних типу безліч, типізованих констант типу безліч, змінних, заданим перерахуванням, вивчити припустимі операції над змінними цих типів.

Приклад

Приклад1: Даний текст. Визначити яких букв більше - голосних або згодних. Етапи рішення завдання: 1. Складемо блок схему програми

Опишемо докладніше блок "Підраховуємо кількість голосних і згодних букв"

Розглянемо блок "Друкуємо відповідне повідомлення"

Запишемо блок-схему цілком

2. Переведемо алгоритм на мову Паскаль

program example1;

const

glasn=['а','е','и','о','у','ы','э','ю','я'];

soglas=['б','в','г','д','ж','з','й','л','м',

'н','р','к','п','с','т','ф','х','ц','ч','ш','щ'];

var

st: string;

g,s,i:integer;

begin

write('Уведіть рядок> '); readln(st);

g:=0; s:=0;

for i:= 1tolength(st) do

ifst[i]inglasntheninc(g)elseifst[i]insoglastheninc(s);

ifg>sthenwriteln('Гласных більше')

else if g< s then writeln('Згодних більше')

else writeln('Згодних і голосних букв нарівно');

readln;

end.

Контрольні питання

1. Що така безліч, як воно описується в мові Pascal?

2. Як визначити новий тип даних з використанням перерахування?

3. Як описуються типізовані константи типу безліч?

4. Як здійснюється уведення-висновок значень змінних типу безліч?

5. Які типи даних використовуються в якості базових при оголошенні типу безліч?

6. Які операції визначені над безлічами?

7. Які операції припустимі над змінним, заданим перерахуванням?

8. Чим схожі й чим відрізняються безлічі й масиви?

9. Яке значення у виражень: а) x in [x]; б) [ ] <= [x,y,z]; в) [x]<>[x,x,x]