Комментарии: Решаем задачи Абрамян на Паскале. Minmax17

Автор: Anton

Anton — Wed, 20 Jan 2016 05:21:46 +0000

Да… я до этого дошёл в задаче 21 🙁
Поправил.
Было:

Writeln(i-1-MaxNum);

1	Writeln(i-1-MaxNum);

Стало:

Writeln(N-MaxNum);

1	Writeln(N-MaxNum);

Автор: olegst1975

olegst1975 — Tue, 19 Jan 2016 19:22:44 +0000

[crayon-6933d6e5e4336855146077 inline="true" ]
for i:=1 to10 do write();
write(i);

[crayon-6933d6e5e4336855146077 inline="true" ]

for i:=1 to10 do write();

write(i);

[/crayon]

В Lazarus,Turbopascal7.0,PascalABC ответ -10, а в Delphi7 — 11. Значение счетчика по выходу из цикла на усмотрение транслятора. Некорректно использовать его значение. Тоже и в задаче Minmax21.

Автор: olegst1975

olegst1975 — Tue, 19 Jan 2016 14:22:35 +0000

В ответ на Anton. Мне казалось, что цикл со счётчиком — цикл, в котором некоторая переменная изменяет своё значение от заданного начального значения до конечного значения(не выше)...хотя в Си, цикл for, в действительности является циклом с предусловием. Дома перепроверю.

Автор: Anton

Anton — Tue, 19 Jan 2016 08:50:17 +0000

В ответ на olegst1975. ... как вариант можно и N... но к этому моменту i=N+1... так что почему бы и не, Writeln(i-1-MaxNum);

Автор: olegst1975

olegst1975 — Tue, 19 Jan 2016 08:31:32 +0000

строка 27 скорее так:
Writeln(N-MaxNum);