Программа 10:

Program PR10;
var
S, i: integr;
begin
S: = 0;
for i: = 20 to 40 do begin
S: = S + i;
i: = i+9;
write (i, ‘-‘, S);
end;
end.

а) Сколько раз выполняется тело цикла в данной программе?
б) Что будет записано в переменную S после выполнения программы?
в) Что будет напечатано на экране?
г) Как изменится результат печати, если поменять местами две предпоследние строки программы?


2. Сколько раз будут выполнены инструкции между begin – end?
a) for i:=j to j+1 do begin
. . .
end;
b) k: = 0;
for i: = 2 downto k do begin
. . .
end;
3. Чему будет равен х после выполнения инструкции?
x:=0;
for i:= -5 to 0 do
n :=i* i;
x := x + n;

Большое спасибо!

Я, конечно, премного извиняюсь, но внутри цикла for МОЖНО менять значение счетной переменной, и это лишь изменит количество выполненных итераций.

тут решаю не я а компилятор. я запустила программу, компилятор выдал ошибку. Система PascalABC.NET 3.1 сборка 1239

даже ели в старых системах были допустимы такие вещи, то я считаю, что не хорошо учить школьников неверным методам программирования

Ну, что ни говори, а в последнем вы точно правы - программировать нужно правильно.

1а) 0 раз потому что будет выдана ошибка "Нельзя изменять значение переменной цикла внутри этого цикла"б) Соответственно останется 0в) ничегог) никак, ошибка будет повторяться2 а) 2 разаb)3 раза3) 0

#1a) 3b) 90c) 29-20-39-50-49-90d) 20-20-30-50-40-90#2a) 2b) 3#3 0