Одномерный целочисленный массив в паскале.

Malysya · 04.05.2011, 10:40

Нужно найти результаты одномерного целочисленного массива на паскале.
for i:=0 to10 do
A[10-i]:=i;
k:=A[9];
for i:=1 to 9 do
A[10-i]:=A[9-i];
A[1]:=k;

Чему будут равны элементы этого массива?

Vladimir_S · 04.05.2011, 12:20

Цитата:

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

Чему будут равны элементы этого массива?

Выведите на экран да посмотрите. Какие проблемы?

Boshaft_Elfe · 04.05.2011, 12:53

Цитата:

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

Выведите на экран да посмотрите. Какие проблемы?

Если я не ошибаюсь, то это задание А6 из ЕГЭ по информатике, нужно посчитать самостоятельно.

Malysya · 04.05.2011, 12:59

Не ошибаетесь. пожалуста подскажите как именно это решить, а то я запуталась уже,
и на экран не выводится хотя ошибку не показывает.

Boshaft_Elfe · 04.05.2011, 13:09

Если я все посчитала правильно, то должен получиться такой набор элементов: 1 9 8 7 6 5 4 3 2. Но я могла ошибиться.

Boshaft_Elfe · 04.05.2011, 13:19

Решается не сложно: здесь цикл с параметром от 0 до 10, Вам нужно поочередно принимать за i все целые числа от нуля до десяти. Начинаем: i:=0, A[10-0]:=0, A[10]:=0, то есть десятый элемент массива будет равен нулю. i:=1, A[10-1]:=1, A[9]:=1, девятый элемент равен единице. И так до десяти. k:=A[9] - это значит, что переменная k будет равна значению девятого элемента массива, то есть 1. Второй цикл делается также, только от единицы до девяти.

Boshaft_Elfe · 04.05.2011, 13:25

Второй цикл: начинаем с 1 - i:=1, A[10-1]:=A[9-1], A[9]:=A[8]. Это значит, что теперь девятый элемент примет значение восьмого, которое задается первым циклом, когда i:=2, A[10-2]=2, A[8]:=2. То есть, девятый элемент теперь будет равен двум.

AlexZir · 04.05.2011, 13:26

Примерно так:

З.Ы. Исправил ошибку

Vladimir_S · 04.05.2011, 13:27

Цитата:

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

Если я все посчитала правильно, то должен получиться такой набор элементов: 1 9 8 7 6 5 4 3 2. Но я могла ошибиться.

Ира - увы, ответ неверный! Ошибка в том, что нумерация массива начинается с 0, а не с 1, а потому массив содержит даже не 9, как в твоем ответе, а 11 элементов.
А считать на пальцах мне лень, есть машина, она железная, вот пусть и трудится. А потому оформляем программу:

Код:

Uses CRT;
VAR
 A:Array[0..10] of Byte;
 i,k:Byte;

BEGIN
 ClrScr;
 for i:=0 to 10 do
  A[10-i]:=i;
 k:=A[9];
 for i:=1 to 9 do
  A[10-i]:=A[9-i];
 A[1]:=k;
 for i:=0 to 10 do
  Write(A[i]:3);
 ReadLn;
END.

Запускаем, и в результате имеем:

AlexZir · 04.05.2011, 13:37

Вот ведь незадача, про нулевой элемент я забыл

Нашел похожее задание. Там в вариантах ответа действительно 11 чисел, а не 9.

04.05.2011, 10:40	#1 (permalink)
Malysya Member Регистрация: 18.04.2011 Сообщений: 20 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Одномерный целочисленный массив в паскале. Нужно найти результаты одномерного целочисленного массива на паскале. for i:=0 to10 do A[10-i]:=i; k:=A[9]; for i:=1 to 9 do A[10-i]:=A[9-i]; A[1]:=k; Чему будут равны элементы этого массива?

04.05.2011, 13:26	#8 (permalink)
AlexZir support Регистрация: 19.08.2007 Адрес: Зея Сообщений: 15,797 Записей в дневнике: 71 Сказал(а) спасибо: 166 Поблагодарили 203 раз(а) в 86 сообщениях Репутация: 75760	Примерно так: З.Ы. Исправил ошибку __________________ Убить всех человеков!

04.05.2011, 13:37	#10 (permalink)
AlexZir support Регистрация: 19.08.2007 Адрес: Зея Сообщений: 15,797 Записей в дневнике: 71 Сказал(а) спасибо: 166 Поблагодарили 203 раз(а) в 86 сообщениях Репутация: 75760	Вот ведь незадача, про нулевой элемент я забыл Нашел похожее задание. Там в вариантах ответа действительно 11 чисел, а не 9. __________________ Убить всех человеков!

04.05.2011, 10:40
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Можете посмотреть в ранее созданных на форуме темах Одномерный массив в Паскале Одномерный массив в Delphi Одномерный массив В Паскале двумерный массив

04.05.2011, 12:59	#4 (permalink)
Malysya Member Регистрация: 18.04.2011 Сообщений: 20 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Не ошибаетесь. пожалуста подскажите как именно это решить, а то я запуталась уже, и на экран не выводится хотя ошибку не показывает.

04.05.2011, 13:09	#5 (permalink)
Boshaft_Elfe Member Регистрация: 28.03.2010 Сообщений: 477 Записей в дневнике: 4 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 1837	Если я все посчитала правильно, то должен получиться такой набор элементов: 1 9 8 7 6 5 4 3 2. Но я могла ошибиться.

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070

04.05.2011, 13:19	#6 (permalink)
Boshaft_Elfe Member Регистрация: 28.03.2010 Сообщений: 477 Записей в дневнике: 4 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 1837	Решается не сложно: здесь цикл с параметром от 0 до 10, Вам нужно поочередно принимать за i все целые числа от нуля до десяти. Начинаем: i:=0, A[10-0]:=0, A[10]:=0, то есть десятый элемент массива будет равен нулю. i:=1, A[10-1]:=1, A[9]:=1, девятый элемент равен единице. И так до десяти. k:=A[9] - это значит, что переменная k будет равна значению девятого элемента массива, то есть 1. Второй цикл делается также, только от единицы до девяти.

04.05.2011, 13:25	#7 (permalink)
Boshaft_Elfe Member Регистрация: 28.03.2010 Сообщений: 477 Записей в дневнике: 4 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 1837	Второй цикл: начинаем с 1 - i:=1, A[10-1]:=A[9-1], A[9]:=A[8]. Это значит, что теперь девятый элемент примет значение восьмого, которое задается первым циклом, когда i:=2, A[10-2]=2, A[8]:=2. То есть, девятый элемент теперь будет равен двум.