В языке запросов поискового сервера для обозначения логической операции «ИЛИ» используется символ хо, а для логической операции «И» Символ в о.
т
В таблице приведены запросы и количество найденных по ним страниц некоторого
сегмента сети, Считается, что все запросы выполнялись практически одновременно, так что
набор страниц, содержащих все искомые слова, не изменялся за время выполнения запросов.
Запрос
Найдено страниц (в тысячах)
Евгений Онегин
1700
Евгений
1600
Онегин
1200
Какое количество страниц (в тысячах) будет найдено по запросу Евгений Онегин»
2. Меняется всего одна строка в программе:
program pr2;
type
student = record {объявление нового типа данных student}
LastName: string; {фамилия студента}
bal: array [1..5] of integer; {массив для 5-ти оценок}
average: real {средний студента}
end;
var
pupil: array [1..100] of student; {массив pupil (максимум из 100 элементов) типа student}
n, i, j, s: integer;{переменные целого типа}
begin
write('Введите количество студентов: ');
readln(n);
for i := 1 to n do
begin{запрос данных по n студентам}
with pupil[i] do
begin
Write('Введите фамилию студента №', i, ': '); {запрос фамилии студента под номером i}
Readln(LastName);
s := 0; {целочисленная переменная для определения суммы студента}
for j := 1 to 5 do
begin{цикл для обработки 5-ти оценок каждого студента}
write('Введите оценку за экзамен №:', j, ': ' );
readln(bal[j] );
s := s + bal[j]; {суммирование 5-ти оценок студента}
end;
average := s / 5; {определение среднего значения и запись в переменную average}
end;
end;
writeln;
writeln( 'Студенты, имеющие средний больший или равный 4');
for i := 1 to n do
begin
if pupil[i].average >= 4 then {если средний студента >=4}
write(pupil[i].LastName,', ');
end;
end.