Впрограмме описан одномерный целочисленный массив с индексами от 0 до 10 и целочисленная переменная i. в ниже фрагменте программы массив сначала заполняется, а потом изменяется: for i: =0 to 10 do a[i]=1+1 for i: =1 to 10 do a[i]: =a[1-1] чему будут равны элементы этого массива? 1) 1 1 2 3 4 5 6 7 8 9 10 2) 1 2 3 4 5 6 7 8 9 10 10 3) 1 1 1 1 1 1 1 1 1 1 1 4) 0 1 2 3 4 5 6 7 8 9 10

Если считать, что вместо A[i]=1+1 написано A[i]=i+1,
 а вместо A[i]:=A[1-1]  написано A[i]:=A[i-1]  (что скорее всего, иначе нужного ответа вообще нет), то после первого цикла получится массив 
 1  2  3  4  5  6  7  8  9 10 11,
а после второго -  1  1  1  1  1  1  1  1  1  1  1
ответ: 3)

1.
var x,y:integer;
begin
write('x = ');
readln(x);
if x>0 
 then y:=1
 else if x=0 then y:=0 else y:=-1;
writeln('y = ',y);
end.

Пример:
x = -5
y = -1

2.
var a,b,c,x1,x2,d:real;
begin
writeln('Введите a, b, c:');
readln(a,b,c);
d:=b*b-4*a*c;
if d>0
 then begin
      x1:=(-b+sqrt(d))/(2*a);
      x2:=(-b-sqrt(d))/(2*a);
      writeln('x1 = ',x1,' x2 = ',x2);
      end
  else if d=0 then begin
                   x1:=-b/(2*a);
                   writeln('x = ',x1);
                   end
               else writeln('Корней нет');
end. 

Пример:
Введите a, b, c:
2 5 -3
x1 = 0.5 x2 = -3

3.
var a,b,c:real;
begin
writeln('Введите a, b, c:');
readln(a,b,c);
if (a<=b)and(b<=c)
 then begin
      b:=a; c:=a;
      end
 else begin
      a:=-a; b:=-b; c:=-c; 
      end;
writeln('a = ',a,' b = ',b,' c = ',c);
end. 

Пример 1:
Введите a, b, c:
2 5 9
a = 2 b = 2 c = 2

Пример 2:
Введите a, b, c:
2 9 5
a = -2 b = -9 c = -5

Я бы купила MacBook Air 13 2016 модельного года, так как это идеальный компьютер для работы и учебы. Я бы взяла с 8 ГБ оперативной памяти и 512 ГБ  SSD для быстрой работы. У него достаточно мощный процессор Intel Core i5. Его полностью хватает на повседневные задачи и даже баловство в 3D редакторах. Аккумулятор держать ноутбук в тонусе на протяжении 12 часов без подключения к сети. Идеал для студента или школьника! Ноутбук обладает самым лучшим тачпадом с поддержкой жестов! полноразмерная клавиатура обладает регулируемой подсветкой! 
И главной отличительной чертой всех продуктов Apple является - ПО! 
Множество качественно программного обеспечения и отсутствие вирусов - непаханое поле для работы! 
Все это подчеркивает строгий, легкий, компактный корпус.