Question

1. Определите значение переменной a после выполнения фрагмента программы
a := 10;
if a > 5 then
a := a + 10
else
a := a - 3;
if a b then
M := a
else
M := b;
if c > b then
M := c
else
M := b;
При каких наборах значений a, b, c эта программа работает неверно?

1
a = 3; b = 2; c = 1
2
a = 2; b = 1; c = 3
3
a = 1; b = 2; c = 3
4
a = 2; b = 3; c = 1
5
a = 1; b = 3; c = 2
6
a = 3; b = 1; c = 2
3. Какое число нужно записать вместо многоточия, чтобы в результате работы фрагмента программы были напечатаны ровно четыре звездочки?
x:=...;
while x < 9 do begin
writeln('*');
x := x + 1;
end;
4. С цикла for вычислите значение выражения 2*3 + 3*4 + ... + 39*40
5. Сколько ячеек памяти будет отведено для хранения массива A, заданного таким образом?
var A: array[-7..7] of integer;
6. Массив из десяти элементов заполнили, а потом изменили. Чему будет равна сумма значений элементов массива после выполнения фрагмента программы?
for i := 1 to 10 do
A[i]:=i;
for i := 2 to 10 do
A[i]:= A[i - 1];
7. Программист написал программу, вычисляющую сумму элементов массива A, десятичная запись которых заканчивается на 6. Какое условие он записал вместо многоточия?
s := 0;
for i := 1 to n do begin
if ... then
s:= s + A[i]
end;