1. Маша 7а, Даша 7б, Катя и Оля 8а...2. Валя 5, Боря 8, Аня 13, Галя 15.....3. Не уверена, но у меня получилось В Б А, и они живут на Б....4.Дракон в 1, тигр в 3, принцесса во 2.
var
x, y : real;
begin
read (x, y);
if (x > 0) and (y < 0) then writeln ('Yes') else writeln ('No');
end.
Не знаю только, как рассмотреть случай, если одна из координат = 0
var
a, b, c : real;
begin
if (a > b) then
begin
c := a;
a := abs (a + b);
b := sqr (c) - sqr (b);
end
else
begin
c := b;
b := abs (b + a);
a := sqr (c) - sqr (a);
end;
writeln (a, ' ', b);
end,
<span>а) ні</span>
<span>б) так</span>
<span>в) так</span>
<span>г) так</span>
Var a:array [1..100] of integer;
<span>i:integer; </span>
<span>begin </span>
<span>randomize; </span>
<span>for i:=1 to 100 do begin </span>
<span>a[i]:=random(i); </span>
<span>if (a[i]>=10) and (a[i]<=99) then write (a[i],' '); </span>
<span>end; </span>
<span>end.</span>
Прогоняем через XOR соответствующие ячейки.
Логика такова: если цвет одинаковый, то 0, иначе - 1.
1 - Закрашено, 0 - не закрашено
![\left[\begin{array}{cccc}0&0&0&1\\ 0&1&1&1\\ 1&0&1&0\\ 0&0&0&0\\ 0&0&0&0\\\end{array}\right]](https://tex.z-dn.net/?f=+%5Cleft%5B%5Cbegin%7Barray%7D%7Bcccc%7D0%260%260%261%5C%5C+0%261%261%261%5C%5C+1%260%261%260%5C%5C+0%260%260%260%5C%5C+0%260%260%260%5C%5C%5Cend%7Barray%7D%5Cright%5D+)
Затем располагаем в порядке возрастания кол-ва закрашенных символов
![\left[\begin{array}{cccc}0&0&0&0\\ 0&0&0&0\\0&0&0&1\\1&0&1&0\\0&1&1&1\\\end{array}\right]](https://tex.z-dn.net/?f=+%5Cleft%5B%5Cbegin%7Barray%7D%7Bcccc%7D0%260%260%260%5C%5C+0%260%260%260%5C%5C0%260%260%261%5C%5C1%260%261%260%5C%5C0%261%261%261%5C%5C%5Cend%7Barray%7D%5Cright%5D)