Задание 1 Запрос Найдено страниц
(в тысячах)
(Испания & Америка) | (Испания & Индия) 800
Испания & Америка 600
Испания & Индия & Америка 50
Какое количество страниц (в тыс.) будет найдено по запросу Испания & Индия?
Задание 2.
Запрос Найдено страниц
(в тысячах)
Леннон & Маккартни & Старр 1100
Леннон & Маккартни & Харрисон 1300
Леннон & Маккартни & Старр & Харрисон 1000
Какое количество страниц (в тыс.) будет найдено по запросу
(Леннон & Маккартни & Старр) | (Леннон & Маккартни & Харрисон)?
.
1) varA, B: integer;beginreadln(A);readln(B);if (A>B) then writeln(A)else writeln(B);end.2)varA, B: integer;beginreadln(A);readln(B);if (A>B) then writeln(B)else writeln(A);end.3)varA, B: integer;beginreadln(A);readln(B);if (A>B) then beginwriteln (A, ' - максимальное число');writeln (B, ' - минимальное число');end;if (B>A) then beginwriteln (B, ' - максимальное число');writeln (A, ' - минимальное число');end;end.4)varA, B, c, d: integer;beginreadln(A);readln(B);c:= A+2*B;d:= 3*A-B;if (c>d) then writeln ('A+2B > 3A-B')else writeln ('3A-B > A+2B');end.
Воот))
Процедуры, не связанные с объектами и событиями, называются процедурами пользователя или подпрограммами. Пользовательские процедуры можно использовать неоднократно. Если текст процедуры пользователя был записан в разделе General - в окне программного кода формы, то она будет доступна только для данной формы, но не доступна для других форм этого же приложения.
Чтобы процедура пользователя была доступна на всех формах приложения, ее текст следует записать в специальном окне
Module - модуль приложения. Программный код такой процедуры будет храниться в файлах приложения с расширением *.bas.