Найти ошибки в программе

@ReiFong · Регистрация: 15.11.2016

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

Прошу помогите
1 задание

Pascal

program zadanie1;
var x: ^boolean;
Y: boolean;
begin
{a} New(x);
{b} x^:=True; Y:=not X^;
{c}Dispose(x);
{d}Writeln(Y);
end.

Ответьте на вопросы:
A) Какие переменные существуют в каждой из точек a,b,c,d, каковы их значения в эти моменты ?
B) Можно ли переменной X присвоить ссылку на переменную Y? Можно ли с помощью процедуры Dispose уничтодить переменные x и y?

2 задание
Найти ошибки в следующей программе:

Pascal

program Errors;
var A,B: ^integer;
begin
if A=Nil then Read(A);
A^:=5;
B:=Nil;
B^:=2;
New(B);
Read(B^);
Writeln(B,B^);
New(A);
B:=A;
Dispose(A)
B^:=4;
end.

@ZX Spectrum-128 · 29.05.2017, 21:25

Создавайте темы с осмысленными и понятными названиями - это серьезно повышает шансы, что на ваш вопрос ответят.

https://www.cyberforum.ru/announcement.php?a=3

@ZX Spectrum-128 6810 / 4567 / 4819 Регистрация: 05.06.2014 Сообщений: 22,438
	29.05.2017, 21:25	2
	Создавайте темы с осмысленными и понятными названиями - это серьезно повышает шансы, что на ваш вопрос ответят. https://www.cyberforum.ru/announcement.php?a=3 0

Опции темы