Бак от IJust 2

[илья-т]

Определите значение переменной m после выполнения следующего фрагмента программы:

m:=0;
for i:=1 to 10 do
begin
n:=i+2;
if n>10
then m:=n+m*2
else m:=m+1;
end;

помогите пожалуйста
в ответе 66 а у меня не так

_____
Код программы нужно выделять (форматировать) тегами [CODE][/CODE] (читать FAQ)
Модератор

[Serge_Bliznykov]

Вы бы отформатировали сначала код

program ideone;
var n,m,i:integer;
begin
	m:=0;
	for i:=1 to 10 do
	begin
    		n:=i+2;
	    	if n>10
    			then m:=n+m*2
    			else m:=m+1;
	end;
	writeLn(m)
end.

в ответе будет 66 - пруф - https://ideone.com/w3UNaj

Сообщение от илья-т

у меня не так

скорее всего Вы не учитываете, что вычисление m производится ВНУТРИ цикла
т.е.
первая итерация
i=1
n:=i+2; // n становится равным 3
if n>10 // условие не выполняется
else m:=m+1; // m становится 1

цикл 2
i=2
n:=i+2; // n становится равным 4
if n>10 // условие не выполняется
else m:=m+1; // m становится 2
и т.д.

[илья-т]

Определите значение переменной m после выполнения следующего фрагмента программы:

m:=0;
for i:=1 to 10 do
begin
n:=i+2;
if n>10
then m:=n+m*2
else m:=m+1;
end;

не получается
помогите

[Black Fregat]

Первые 8 итераций будет выполняться ветка else, в результате m = 8.
Потом
8 * 2 + 11 = 27
27 * 2 + 12 = 66

[digitalis]

Бляха-муха, сказали ему: форматируй код, объяснили ход решения - все равно тупо копипастит свой начальный код. Вставь в цикле перед end

writeln (i,n,m );

- будешь видеть весь ход процесса.
И где тут бак ?

[Serge_Bliznykov]

Сообщение от digitalis

будешь видеть весь ход процесса.

видеть - это не значит понимать

[илья-т]

Сообщение от digitalis

Бляха-муха, сказали ему: форматируй код, объяснили ход решения - все равно тупо копипастит свой начальный код. Вставь в цикле перед end
Код:

я учусь в 9 классе и мы только начали проходить паскаль
решаем все письменно в тетради
поэтому не сразу понял ход решения

[Serge_Bliznykov]

Сообщение от илья-т

я учусь в 9 классе и мы только начали проходить паскаль

понятно.

Сообщение от илья-т

решаем все письменно в тетради

в тетради тем более надо записывать код с отступами, форматировать его, чтобы было видно, какой блок кода (операторы) к чему относится.

Сообщение от илья-т

поэтому не сразу понял ход решения

не сразу, но всё таки понял?

а я вот не понял, что означает "Бак от IJust 2"...

[илья-т]

Сообщение от Serge_Bliznykov

а я вот не понял, что означает "Бак от IJust 2"...

я только сегодня зарегистрировался
и случайно заголовок не тот напечатался вот так

[digitalis]

Ну тогда учись. Выучишься - программистом станешь, не выучишься - начальником будешь.
А изучать Паскаль "в тетрадке", без компа - все равно, что... ну ладно, не буду мо'лодежь развращать.