Заполнить массив У(10) случайными значениями. Организовать вывод на экран. Присвоить указателю адрес начала размещения массива в памяти

@Анастоия · Регистрация: 20.09.2013

Студворк — интернет-сервис помощи студентам

Заполнить массив У(10) случайными значениями. Организовать вывод на экран. Присвоить указателю адрес начала размещения массива в памяти. Напечатать значения первой половины элементов массива. Присвоить указателю адрес 9-го элемента, напечатать его значение, используя текущий базовый адрес сегмента и смещение с преобразованием в значение типа указатель. Заменить его содержимое на значение 5-го элемента, уменьшенное на 0.02. Напечатать его новое значение.

@bormant · 13.03.2014, 16:48

Сообщение от Анастоия

Присвоить указателю адрес 9-го элемента, напечатать его значение, используя текущий базовый адрес сегмента и смещение с преобразованием в значение типа указатель.

Не совсем понятно, что именно требовалось:
- напечатать значение указателя на 9 элемент? Тогда незачем что-то преобразовывать в значение типа указатель:

Pascal

1 2	p:=@y[9]; {или} p:=Addr(y[9]); WriteLn(Seg(p^),':',Ofs(p^));

- напечатать значение элемента по указателю? Достаточно существующего указателя:

Pascal

1 2	p:=@y[9]; {или} p:=Addr(y[9]); WriteLn(p^); {или} WriteLn(PReal(p)^);

- напечатать значение элемента по указателю, заново собрав указатель из сегмента и смещения?

Pascal

1 2	p:=@y[9]; {или} p:=Addr(y[9]); WriteLn(PReal(Ptr(Seg(p^),Ofs(p^)))^);

Pascal

var
  y: array [1..10] of real;
  p: ^real;
  i: integer;
begin
  Randomize;
  for i:=1 to 10 do begin
    y[i]:=Random*100;  { заполнение случайными значениями }
    Write(y[i]:8:2);   { вывод на экран }
  end; WriteLn;
  p:=@y;               { адрес начала размещения массива в памяти }
  for i:=1 to 5 do Write(y[i]:8:2); WriteLn;
  p:=@y[9];            { адрес 9-го элемента }
  WriteLn(Seg(p^),':',Ofs(p^));  { значение указателя }
  p^:=y[5]-0.02;       { заменить 9-й элемент значением 5 элемента - 0.02 }
  WriteLn(p^);         { ... и вывести новое значение }
end.

@Анастоия 0 / 0 / 0 Регистрация: 20.09.2013 Сообщений: 22
		1
	Заполнить массив У(10) случайными значениями. Организовать вывод на экран. Присвоить указателю адрес начала размещения массива в памяти 13.03.2014, 11:53. Показов 1329. Ответов 1 Метки нет (Все метки) Заполнить массив У(10) случайными значениями. Организовать вывод на экран. Присвоить указателю адрес начала размещения массива в памяти. Напечатать значения первой половины элементов массива. Присвоить указателю адрес 9-го элемента, напечатать его значение, используя текущий базовый адрес сегмента и смещение с преобразованием в значение типа указатель. Заменить его содержимое на значение 5-го элемента, уменьшенное на 0.02. Напечатать его новое значение. 0

Опции темы

Заполнить массив У(10) случайными значениями. Организовать вывод на экран. Присвоить указателю адрес начала размещения массива в памяти

Решение