1) запросы к поисковому серверу. для каждого запроса указан его код – соответствующая буква от а до г. запишите в таблицу коды запросов слева направо в порядке возрастания количества страниц, которые нашёл поисковый сервер по каждому запросу. по всем запросам было найдено разное количество страниц. для обозначения логической операции «или» в запросе используется символ «|», а для логической операции «и» – символ «& ».
а: рим & париж & лондон
б: лондон | рим
в: рим & лондон
г: рим | париж | лондон
2) запросы к поисковому серверу. для каждого запроса указан его код – соответствующая буква от а до г. запишите в таблицу коды запросов слева направо в порядке возрастания количества страниц, которые нашёл поисковый сервер по каждому запросу. по всем запросам было найдено разное количество страниц. для обозначения логической операции «или» в запросе используется символ «|», а для логической операции «и» – символ «& ».
а: лебедь | рак | щука
б: лебедь & рак
в: лебедь & рак & щука
г: лебедь | рак
3) запросы к поисковому серверу. для каждого запроса указан его код – соответствующая буква от а до г. запишите в таблицу коды запросов слева направо в порядке убывания количества страниц, которые нашёл поисковый сервер по каждому запросу. по всем запросам было найдено разное количество страниц. для обозначения логической операции «или» в запросе используется символ «|», а для логической операции «и» – символ «& ».
а: солнце | воздух | вода
б: солнце & воздух
в: солнце & воздух & вода
г: солнце | воздух
4) запросы к поисковому серверу. для каждого запроса указан его код – соответствующая буква от а до г. запишите в таблицу коды запросов слева направо в порядке возрастания количества страниц, которые нашёл поисковый сервер по каждому запросу. по всем запросам было найдено разное количество страниц. для обозначения логической операции «или» в запросе используется символ «|», а для логической операции «и» – символ «& ».
а: мороз | солнце | день | чудесный
б: (мороз & солнце) | день
в: мороз & солнце
г: мороз & солнце & день & чудесный
5) запросы к поисковому серверу. для каждого запроса указан его код – соответствующая буква от а до г. запишите в таблицу коды запросов слева направо в порядке возрастания количества страниц, которые нашёл поисковый сервер по каждому запросу. по всем запросам было найдено разное количество страниц. для обозначения логической операции «или» в запросе используется символ «|», а для логической операции «и» – символ «& ».
а: портрет & пейзаж & натюрморт
б: портрет | пейзаж
в: портрет | пейзаж | натюрморт
г: портрет | (пейзаж & натюрморт)
6) запросы к поисковому серверу. для каждого запроса указан его код – соответствующая буква от а до г. запишите в таблицу коды запросов слева направо в порядке возрастания количества страниц, которые нашёл поисковый сервер по каждому запросу. по всем запросам было найдено разное количество страниц. для обозначения логической операции «или» в запросе используется символ «|», а для логической операции «и» – символ «& ».
а: мартышка | осёл | мишка
б: мартышка & осёл & мишка
в: мартышка & осёл
г: (мартышка & осёл) | мишка
7) запросы к поисковому серверу. для каждого запроса указан его код – соответствующая буква от а до г. запишите в таблицу коды запросов слева направо в порядке возрастания количества страниц, которые нашёл поисковый сервер по каждому запросу. по всем запросам было найдено разное количество страниц. для обозначения логической операции «или» в запросе используется символ «|», а для логической операции «и» – символ «& ».
а: солнце & воздух
б: солнце | воздух | вода
в: солнце | воздух | вода | огонь
г: солнце | воздух
N = 33;
Var
A:array[1..N] of integer;
i:integer;
Begin
Randomize;
Write('Исходный массив:');
For i:= 1 to N do
Begin
A[i]:=random(100000)-50000;
Write(' ',A[i]);
End;
WriteLn;
WriteLn;
Write('Трёхзначные числа:');
For i:= 1 to N do
if (99<Abs(A[i]))and(Abs(A[i])<1000) then Write(' ',A[i]);
WriteLn;
Write('Номера четырёхзначных чисел:');
For i:= 1 to N do
if (999<Abs(A[i]))and(Abs(A[i])<10000) then Write(' ',i)
End.
Пример:
Исходный массив: 12916 46699 20251 -36637 -14335 -33817 -25279 -5819 -6258 23375 15258 1264 10987 42877 9875 3515 -22647 -791 47876 -319 -23437 -43546 -46174 -29378 -17999 -37325 -10130 -38120 -40079 -12188 -34612 -17302 28074
Трёхзначные числа: -791 -319
Номера четырёхзначных чисел: 8 9 12 15 16
Const
N = 10;
Var
f:text;
S:string;
A:array[1..N] of longint;
i,j,k:integer;
Begin
ClrScr;
WriteLn('Введите имя файла текстового, если он лежит в папке с программой(ВходнойФайл.txt)');
WriteLn('Или введите полное имя файла (C:\...\ВходнойФайл.txt)');
ReadLn(S);
Assign(f,S);
Reset(f);
i:=1;
Repeat
Read(f,A[i]);
i:=i+1;
Until i>N;
Write('Содержимое файла:');
For i:= 1 to N do
Write(' ',A[i]);
WriteLn;
Write('Уникальные элементы:');
For i:= 1 to N do
Begin
k:=1;
For j:= 1 to N do
if i<>j then
if A[i]=A[j] then k:=k+1;
if k=1 then Write(' ',A[i])
End;
ReadLn;
End.
Пример:
Введите имя файла текстового,если он лежит в папке с программой(ВходнойФайл.txt)
Или введите полное имя файла (C:\...\ВходнойФайл.txt)
123.txt
Содержимое файла: 1 2 13 5 2 1 3 17 19 21
Уникальные элементы: 13 5 3 17 19 21