В таблице приведены запросы к поисковому серверу. Для каждого запроса указан его код - соответствующая буква от А до Г . Расположите коды запросов слева направо в порядке УБЫВАНИЯ количества страниц , которые нашёл поисковой сервер по каждому запросу .
Для обозначения логической операции «ИЛИ» в запросе используется символом «|» , а для логической операции «И» — «&»
Код Запрос
А Баскетбол
Б Футбол & Баскетбол & Волейбол
В Волейбол | Баскетбол
Г Футбол | Баскетбол | Волейбол
Код Запрос
А Литература | Истрия | Экзамен
Б Экзамен & Литература
В Экзамен | Истрия
Г Истрия & Литература & Экзамен
Можно и без объяснения , самое главное , чтобы ответы были верны!
ОЧЕНЬ
//c циклом for
var s,i:integer;
begin
for i:=100 to 999 do
if i mod 77 = 0 then s:=s+i;
writeln('Сумма трехзначных кратных 77: ',s);
end.
Тестовое решение:
Сумма трехзначных кратных 77: 5929
// с циклом while
var s,i:integer;
begin
i:=100;
while i<=999 do begin
if i mod 77 = 0 then s:=s+i;
i:=i+1;
end;
writeln('Сумма трехзначных кратных 77: ',s);
end.
begin
setwindowsize(600,500);
setbrushcolor(clMedGray);
Ellipse(320,30,490,400);
Ellipse(120,30,300,400);
setbrushcolor(clCream);
Ellipse(335,40,480,380);
Ellipse(140,40,280,380);
setbrushcolor(clMedGray);
Ellipse(100,430,500,130);
setbrushcolor(clNavy);
Ellipse(250,240,200,310);
Ellipse(350,240,400,310);
setbrushcolor(clwhite);
Ellipse(240,270,220,300);
Ellipse(360,270,380,300);
setbrushcolor(clblack);
Ellipse(270,330,330,370);
line(300,370,300,400);
Arc(300,280,120,220,-40);
line(50,350,200,350);
line(30,340,190,340);
line(10,330,180,330);
line(410,330,570,330);
line(400,340,560,340);
line(390,350,550,350);
line(240,230,220,150);
line(230,230,180,80);
line(220,230,180,150);
line(360,230,380,150);
line(370,230,430,80);
line(380,230,430,150);
end.
Эта