Задание 3. Для групповых операций с файлами используют файлов. Маска представляет собой последовательность букв,
допустимых в именах файлов символов, в которых также мо
следующие символы:

Символ «?» (вопросительный знак) означает ровно один производнвй символ

Символ «» (звездочка) означает любую последовате
произвольной длины
числе <<>> может задавать и пустую
последовательность.
В каталоге находится 6 файлов:
door.doc
fedor.docx
msdos.doc
msdos.dat
radost.doc
rodos.docx
Определите, по какой из масок из них будет отобрана ун
-fedor.docx
Amsdos.doc
xadost.doc
Todos.docx

1) .do?.d*
2) ?do.doc
3) .do?.do
4) do?.doc

👇

Открыть все ответы

Ответ:

ksyushenkа

23.04.2023

Перебор всех таких слов по порядку- это по сути счёт по порядку в системе счисления с основанием 4, только вместо цифр 0, 1, 2, 3 использованы буквы А, Е, К, Р.
То есть, буква А соответствует нулю, а первое слово в списке соответствует числу 0000 (используется запись с фиксированным выводом четырёх цифр, включая незначащие нули).

Первым числом, в котором не будет нулей, станет число 1111 (ведь сразу вслед за нулём при последовательном счёте в числе появится цифра один). Этому числу соответствует слово ЕЕЕЕ.

Переведём это число из четверичной системы счисления в десятичную:
1111_4=1*4^3+1*4^2+1*4^1+1*4^0=64+16+4+1=85

1111_4=1*4^3+1*4^2+1*4^1+1*4^0=64+16+4+1=85

Дальше нужно учесть, что в списке под номером 1 стоит число, равное нулю. Значит, к числам, обозначающим слова в списке надо прибавить единицу, тогда они будут равны порядковым номерам списка.

Получается, первое слово, в котором нет буквы А (слово ЕЕЕЕ), идёт в списке под номером 85 + 1 = 86

ответ: номер 86.

4,8(60 оценок)

Ответ:

Sonyavishnya

23.04.2023

//PascalABC.NET

var
A: array [1..15] of integer;
i, sum, n: integer;
begin
for i := 1 to 15 do
begin
    A[i] := random(1001)-500;
    write(A[i], ' ');
end;
writeln;

for i := 2 to 14 do
    if ((A[i] > A[i - 1]) and (A[i] > A[i + 1])) then
    begin

   sum := 0;
n := A[i];
while ( n<>0 ) do
begin
    sum := sum + (n mod 10);
    n := n div 10;
    if n in [-9 .. -1] then
    begin
      if sum - abs(n) < 0 then
        sum := abs(sum) - abs(n)
      else
        sum := sum - abs(n);
      break;
    end;
end;
   writeln('Сумма цифр числа ', A[i], ' = ', sum);
end;
end.

4,6(61 оценок)

Это интересно:

Стиль-и-уход-за-собой

04.06.2022

5 главных секретов ухода за недавно сделанным пирсингом ушей...

Компьютеры-и-электроника

12.02.2023

Как удалить временные файлы в Windows 7: Простые способы и полезные советы...

Дом-и-сад

16.05.2021

Как заменить шнурки в жалюзи - простой и быстрый способ...

19.08.2022