Задание 1: Например, в вашем каталоге расположены следующие файлы: 1test 2test afile1 afile2 bfile1 - id1770858620200129 от martynenko7474 29.01.2020 14:58

Question

Информатика: Задание 1: Например, в вашем каталоге расположены следующие файлы: 1test 2test afile1 afile2 bfile1 file file1 file10 file2 file3 Вопрос 1: Укажите, какие имена файлов будут выбраны, если вы введете следующий шаблон: *file* Вопрос 2: Укажите, какие имена файлов будут выбраны, если вы введете следующий шаблон: file?? Вопрос 3: Какой шаблон необходимо указать для файлов, имена которых заканчиваются на 1 или 2? Вопрос 4: Какой шаблон необходимо указать для файлов, имена которых начинаются с цифры?

martynenko7474 · Accepted Answer

Program proga;
Var
p: text;
i, n : byte;
s,min,m: string;
Begin
write('Введите имя файла '); {Например: C:.txt}
read(m);
Assign(p,m);
reset(p);
read(p,s);
min:=s;
n:=100;
for i:=1 to n do
begin
readln(p,s);
while not eof(p) do
{нахождение минимальной строки}
begin
readln(p,s);
if length(s) <= length(min) then
min:=s;
end;
end;
close(p);
write('самая короткая строка: ',min);
End.

MOGZ ответил