Const n=10;
var a:array[1..n] of integer;
i:integer;
begin
Randomize;
for i:=1 to n do begin
a[i]:=random(51);
write(a[i]:3);
end;
writeln;
writeln('Пары соседних элементов с суммой > 50:');
for i:=2 to n do
if a[i-1]+a[i]>50 then writeln(a[i-1]:3,' ',a[i]);
end.
Пример:
12 34 23 1 12 3 1 42 30 36
Пары соседних элементов с суммой > 50:
34 23
42 30
30 36
Фиговая фотка нифига не видно
А1 = 3
В1 = А1 + 1 = 3 + 1 = 4
А2 = В1 - А1 = 4 - 3 = 1
В2 = А1 - А2 * 2 = 3 - 1 * 2 = 3 - 2 = 1
С2 = А1 + В2 = 3 + 1 = 4
D2 = В1 / 2 = 4 / 2 = 2
По значениям ячеек диапазона A2:D2 была построена диаграмма:
А2 = 1 В2 = 1 С2 = 4 D2 = 2
Смотрим на диаграммы:
На диаграмме б все столбики разные, а у нас два значения одинаковые => не подходит
На диаграмме с три сектора равные, а у нас два значения одинаковые => не подходит
На диаграмме а две полоски одинаковые, но две другие не соблюдают соотношение увеличения в 2 раза, как у наших значений => не подходит
На диаграмме г две полоски одинаковые и две другие соблюдают соотношение увеличения в 2 раза у двух, как у наших значений => подходит
Б может быть только в конце, т.к. там не точек
Число в адресе не может быть больше 255, поэтому сочетания АГ, ГВ и АВ недопустимы. Ответ: ВГАБ.
1 способ 2 способ
х чаек - на первом острове х чаек - на первом острове
у чаек - на втором острове 79-х чаек - на втором острове
х+у=79 х+у=79 х-15-12=79-х+12
х-15-12=у+12 <span>х-у=39</span> 2х=118
2х=118 х=59
х=59 79-59=20
у=20
Ответ: на первом острове 59 чаек, на втором - 20 чаек.