Для групповых операций с файлами используются маски имен файлов. маска представляет собой последовательность букв, цифр и прочих допустимых в именах файлов символов. также в маске может встречаться символ *, который обозначает любую (в том числе пустую) последовательность символов, и символ ? , который обозначает один любой символ. если задана маска *a*l, то ей удовлетворяют файлы с названиями basketball, ball, и не удовлетворяют файлы с названием fox, shark. придумайте маску имени файла, которой бы удовлетворяли имена файлов mister_fox и from_foxford, но не удовлетворяли бы имена файлов brave_oxygen и magic_fox. найдите самую короткую такую маску (состоящую из наименьшего количества символов). в качестве ответа запишите ее длину.
магистральная архитектура как основа современных эвм
современные эвм могут иметь различную архитектуру, но обязательно содержат в своей структуре следующие элементы (арифметико-логическое устройство (алу), выполняющее арифметические и логические операции. устройство (уу), которое организует процесс выполнения программ. запоминающее устройство (память) для хранения программ и данных. внешние устройства для ввода–вывода информации ( и используют основной принцип функционирования эвм – принцип программируемости, дополненный новыми принципами, к которым можно отнести принципы модульности, магистральности и микропрограммируемости.
uses crt;
Var mas:array[1..1000, 1..1000] of integer;
N,M,i,j,k:integer;
Begin
Writeln('Введите размер матрицы N*M');
Write('N = ');
readln(N);
Write('M = ');
readln(M);
if (M>1000) or (N>1000) or (M<1) or (N<1)
then
Writeln('Ошибка, указанные значения выходят за пределы матрицы') else
Begin
Writeln('Введите элементы матрицы');
k:=0;
for i:=1 to N do
for j:=1 to M do
Begin
readln(mas[i,j]);
if (mas[i,j] mod 2 = 0) then k:=k+1;
end;
Writeln();
Writeln('Исходная матрица');
for i:=1 to N do
Begin
for j:=1 to M do
Begin
Write(mas[i,j], ' ')
end;
Writeln();
end;
Writeln();
Writeln('Количество четных элементов = ',k);
end;
readln;
end.