Question

Программа 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;

Answer 1

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

2 а) 2 раза
b)3 раза

3) 0

Answer 2

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

Answer 3

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

Answer 4

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

Answer 5

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

Answer 6

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

Answer 7

#1

a) 3
b) 90
c) 29-20-39-50-49-90
d) 20-20-30-50-40-90

#2

a) 2
b) 3

#3

 0