1. Б
2. А
3. А
4. Б
5. Б
6. В
7. Б
8. Б
9. В
10. Б
11. Б
12. В
13. А
14. Б
15. А
Иногда немного учил Pascal, так что еще знаю некоторые вещи.
Program t1;
var n,i: integer;
begin
writeln('Введите число :');
readln(n);
writeln('Результат :');
for i:=1 to 10 do
begin
writeln(n*i);
end;
readln;
<span>end.</span>
начало
делим на 2
есть остаток нет остатка
возводим в куб возводим в кводрат
конец
В программе последовательно определяются номера элементов (num), имеющих знак, противоположный знаку предыдущих (предыдущего) элемента (<span>Dat[k]*m < 0</span>). Переменная num в цикле последовательно будет принимать значения 2, 3, 5, 6, 8, 9. После цикла будет выведено последнее значение num. (У элемента Dat[10] знак совпадает со знаком элемента Dat[9].)
1 - в
2 - в
3 - б (если только текстовый редактор - не стандартный блокнот)
4 - б
5 - а
6 - в
7 - а
8 - б*