Сколько памяти занимает переменная типа TFigure?

@cvbcvb · Регистрация: 02.12.2009

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

Pascal

type
TFigure=record;
Field1:=string;
Field2:=byte;
case integer of 
1:(x1,y1,x2,y2):Integer;
2:(x,y:Integer; radius:byte);
end;
var 
Figure:TFigure;

подскажите, пожалуйста,как посчитать память?

@Puporev · 30.09.2010, 22:15

SizeOf(TFigure);
кстати после record точку с запятой убери...

@Напильнег · 01.10.2010, 01:09

И :integer в первой ветви вариантной части под скобку занеси.

@Mawrat · 01.10.2010, 03:13

Pascal

type
  TFigure = record
  ...
  end;
var
  Mem : Integer;
begin
  Mem = SizeOf(TFigure);
  Writeln('Для размещения переменной типа TFigure в памяти требуется ', Mem, ' байт.');
...
end.

@Напильнег · 01.10.2010, 11:52

Сто пудофф имеется в виду посчитать руками.

Для этого надо знать размеры стандартных типов данных - куда ж тут денешься. Тип string в Турбо-Паскале имеет размер 256 (внимание, в других диалектах может быть не так), byte он и в Африке 1 байт будет, тип integer в Турбо-Паскале занимает 2 байт (еще раз внимание, помним о диалектах). Размер вариантной части записи с вариантами буде равен размеру самой большой ветви.

Для приведенного типа имеем следующее:
в статической части string и byte - 256+1=257 байт;
в вариантной части ветвь 1 имет размер 4*2=8 байт (4 integer),
ветвь 2 - 2*2+1=5 байт (2 integer + byte), значит
размер вариантной части будет 8 байт;
итого 257+8=265 байт размер всей записи.

@Puporev Почетный модератор 64304 / 47599 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	30.09.2010, 22:15	2
	SizeOf(TFigure); кстати после record точку с запятой убери... 0

@Напильнег 481 / 119 / 17 Регистрация: 30.09.2010 Сообщений: 473
	01.10.2010, 01:09	3
	И :integer в первой ветви вариантной части под скобку занеси. 0

@Напильнег 481 / 119 / 17 Регистрация: 30.09.2010 Сообщений: 473
	01.10.2010, 11:52	5
	Сто пудофф имеется в виду посчитать руками. Для этого надо знать размеры стандартных типов данных - куда ж тут денешься. Тип string в Турбо-Паскале имеет размер 256 (внимание, в других диалектах может быть не так), byte он и в Африке 1 байт будет, тип integer в Турбо-Паскале занимает 2 байт (еще раз внимание, помним о диалектах). Размер вариантной части записи с вариантами буде равен размеру самой большой ветви. Для приведенного типа имеем следующее: в статической части string и byte - 256+1=257 байт; в вариантной части ветвь 1 имет размер 42=8 байт (4 integer), ветвь 2 - 22+1=5 байт (2 integer + byte), значит размер вариантной части будет 8 байт; итого 257+8=265 байт размер всей записи. 1

Опции темы