Для поиска каких типов объектов используется команда изображение, музыка или видео; файлы и папки?

 Рисунки, музыку или видео - для поиска файлов, содержащих данные указанных типов;Документы (текстовые файлы, электронные таблицы и тому подобное) - для поиска файлов, которые созданы в прикладных программах, кроме файлов изображений, музыкальных и звуковых. Например, файлы с расширениями имен DOC, TXT, РРТ, DBF и тому подобное. Все файлы и папки для поиска файлов любых типов и папок.

 список учительницы                                                              список Марины 

Катя Арбузова                                                                            Марина Яблочкина

Яша Арбузов

Коля Белкин                                                                              Роберт   Щукин

Лена Волкова                                                                             Сережа Тополев 

Дима Иволгин                                                                             Валя Стрелкина    

Валя Стрелкина                                                                         Дима Иволгин 

Серёжа Тополев                                                                         Коля Белкин                                                                                                                                                      Лена Волкова

Роберт Щукин                                                                              Яша Арбузов

Марина Яблочкина                                                                     Катя Арбузова

program yourname;
uses crt;
var com:string; i:integer;
begin
writeln('Задайте значените программы.');
writeln('Для того чтобы программа посчитала от 1 до 5 пропишите команду  "go1".');
writeln('Для того чтобы программа посчитала от 5 до 1 пропишите команду  "go2".');
writeln('Для того чтобы сказать программе - пропишите команду "go3".');
readln(com);
If (com = 'go1') then begin
writeln(Программа считает от 1 до 5');
for i:=1 to 5 do writeln(i) end
else if (com = 'go2') then begin
writeln('Программа считает от 5 до 1');
for i:=5 downto 1 do writeln(i) end
else if (com = 'go3') then begin
writeln('Программа: Всегда рада вам
else begin writeln('Данной команды не существует либо вы ввели команду вместе с ковычками.');
Перезапустите программу.') end

 

end.