Практическая работа №5

Тема: Операции с файлами и папками. Проводник

Цель работы: научиться создавать, переименовывать, копировать, перемещать и удалять файлы и папки.

Задание:

1. Откройте программу Проводник, используя контекстное меню кнопки Пуск (Пуск → Все программы → Стандартные → Проводник).

2. Щелкнуть по значку около значка Мой компьютер. Что изменилось на экране?

3. Щелкнуть по значку Мой компьютер.

4. Щелкнуть по значку около значка Мой компьютер. Что изменилось в правом окне?

5. Выполнить следующие действия:

· Установить вид отображения Список.

· Сервис → Свойства папки → закладка Вид.

· Убрать галочку из окошка Скрывать расширения для зарегистрированных типов файлов.

· Применить → Как у текущей папки → Да → Ок.

6. Откройте папку C:\Работа с файлами и измените поочередно вид на: мелкие значки, список, таблица, плитка, содержимое.

7. Упорядочьте содержимое папки по времени изменения, а затем по размеру, отслеживая изменения в таблице ярлыков. Найдите самый старый и самый большой файл.

8. Создать на диске z: папку с именем Exp_№ группы_фамилия.

9. Скопировать в созданную папку файл file.txt, находящийся в папкеC:\Работа с файлами. Копировать перетаскиванием правой кнопкой мыши!

10. Удостовериться в том, что файл скопировался.

11. Переименовать скопированный файл, задав имя Мой файл.txt. Обратить внимание на расширение!

12. В папке Exp_№ группы_фамилия самостоятельно создать вложенную папку prim.

13. Выделить все файлы с именем file00??.chk, находящиеся в папке C:\Работа с файлами и скопировать их во вложенную папку prim, используя контекстное меню.

14. Выделить 2 файла с расширением.txt и файлы file.docи file.xls, находящиеся в папке C:\Работа с файлами и скопировать их в папку z:\Exp_№ группы_фамилия.

15. Предъявить работу преподавателю.

16. Удалить все файлы с именем file* из папки z:\Exp_№ группы_фамилия, используя контекстное меню.

17. Удалить папку prim перетаскиванием в Корзину (под наблюдением преподавателя).

18. Выйти из программы Проводник.

Вывод: научилась создавать, переименовывать, копировать, перемещать и удалять файлы и папки.

Практическая работа № 9

Тема: Turbo Pascal. Условный оператор

Цель занятия: научиться составлять программы с использованием условных операторов.

Условный оператор

Неполная форма: IF условие THEN оператор;

УСЛОВИЕ - это логическое выражение, принимающее значение истина или ложь.

Выполняется инструкция так: если условие истинно, то выполняется оператор,

иначе выполняется следующая за IF..THEN инструкция.

Полная форма: IF условие THEN оператор1

ELSE оператор2;

Если условие истинно, то выполняется оператор1, иначе выполняется оператор2.

В Н И М А Н И Е! Перед словом ELSE точка с запятой не ставится!!

Пример. При нажатии цифры 1 печатается слово 1, а при нажатии любой клавиши слово 2.

Program Text;

Uses crt;

var x: integer;

Begin

ClrScr;

write('Введите цифру 1 или любую:'); readln(x);

if x=1 then write(' Вася')

else write(' Петя');

readln;

End.

Оператор варианта

Оператор варианта является обобщением условного оператора: он дает

возможность выполнить один из нескольких операторов в зависимости

от значения некоторого выражения, называемого СЕЛЕКТОРОМ.

CASE <селектор> OF { case (кейс) - выбор }

< список меток1 >: < оператор1 >; { of (oф) - из }

< список меток2 >: < оператор2 >;

.......:......;

< список метокN >: < операторN >;

ELSE <оператор>

END;

селектор - выражение любого перечисляемого типа, кроме вещественного;

integer, byte-целые из [0;255], char -символьный тип.

оператор - любой оператор языка, в том числе и составной;

список меток - список разделенных запятыми значений выражения 'селектор' или одно его значение; тип метки и селектора одинаков.

Оператор варианта выбирает для исполнения тот ОПЕРАТОР, одна из меток которого равна текущему значению выражения СЕЛЕКТОР. Если ни одна из меток не равна текущему значению селектора, то никакие операторы не выполняются, либо выполняются операторы, следующие за зарезервированным словом ELSE (если такое имеется).

Пример

Program Primer_Case1; Uses crt;

var n:integer;

Begin

clrscr; write('Нажмите цифру 1..8'); readln(n);

Case n of

1,7: write('Ваня');

2: write('В а с я');

3: write('В а л я');

4: write('В а р я');

5: write('В а д я');

6: write('в а з а');

Поиск по сайту: