В-3

1) Опишите последовательность 10 целых чисел с помощью массива
2) Дан фрагмент программы:
For i:=1 to 10 do a[i]:=sqr(i)-i;
Определите элементы массива
3) Дан массив (см задание 2). Определите результат работы фрагмента программы:
K:=0;
For i:=1 to 10 do
If (a[i]>10) and (a[i]<70) then k:=k+1;
Write(k);
4) Напишите фрагмент программы, которая преобразует массив из десяти элементов следующим образом: все отрицательные элементы заменяет -1, а остальные заменяет на 1.