Организация доступа к динамической памяти
Определить: с какими переменными возможно и желательно работать как с динамическими? Изменить программу, включив работу с динамическими переменными:
program kvur;
var a,b,c, d, x1,x2: real;
begin
repeat
writeln ('Vvedi koefficienty KVUR (a<>0)');
write ('a='); readln(a);
write ('b='); readln(b);
write ('c='); readln(c);
until a<>0;
d:=b*b-4*a*c;
if d<0 then writeln ('net korney')
else begin
x1:=(-b+sqrt(d))/(2*a);
x2:=(-b-sqrt(d))/(2*a);
writeln ('x1=',x1:5:2,' x2=',x2:5:2)
end;
readln;
end.
Опишите тип данных: указатель на данные типа <my_type>. Объявите переменные a, b названного типа. Выделите в динамической памяти участки, достаточные для размещения двух переменных типа <my_type> (применить разные способы). Введите в созданные динамические переменные некоторые значения. Выведите их на экран. Присвойте одному из указателей значение другого указателя (Какие предварительные действия нужно сделать? Осуществите их). Выведите значения динамических переменных на экран.
<my_type>:
1). real