Форум » Алгоритмизация и программирование » А 17. Работа с массивами | |
|
Поляков
| |||
Сообщение: 62 Зарегистрирован: 10.03.11 Откуда: Россия, Санкт-Петербург Репутация: 0 |
program qq;Хитрость в том, что после того, как мы дошли до середины массива в цикле
var k: integer;
A: array[0..10] of integer;
begin
for k:=0 to 10 do
A[k]:= k + 1;
for k:=10 downto 0 do
A[k]:= A[10-k];
for k:=0 to 10 do write(A[k], ' ');
end.
for k:=10 downto 0 doвсе "старшие" значения второй половины уже "затерты": вместо 11 стоит 1, вместо 10 - 2 и т.д. Они и будут скопированы в первую часть, то есть фактически не изменятся. Получается массив
A[k]:= A[10-k];
1 2 3 4 5 6 5 4 3 2 1Правильный ответ - 4.
Форум » Алгоритмизация и программирование » А 17. Работа с массивами |
|
|
- участник сейчас на форуме - участник вне форума | Все даты в формате GMT
10 час. Хитов сегодня: 2 Права: смайлы да, картинки да, шрифты да, голосования нет аватары да, автозамена ссылок вкл, премодерация откл, правка нет |