На мой взгляд, самая интересная, но сложная профессия - это быть врачом.
Врач - очень благородная профессия. В современном мире очень быстро развивается медицина. Ведь человек, его здоровье - это самое важное, что есть на земле. Врачи бывают разных
специальностей. Например, лор, невролог, врачи скорой Я думаю, что врачам скорой
сложнее всего. Представьте, сколько вызовов за день могут взвалить на свои плечи эти трудолюбивые люди. Мы должны с уважением относиться к врачам. Ведь придет и наш черед
обратиться к ним за И они Врачи никогда не кинут тебя в беде.
Вот почему я считаю, что врач - это самая благородная и трудная профессия на земле.
Поделитесь своими знаниями, ответьте на вопрос:
Type ref = ^integer; var p, q: ref; пусть p^=5 и q=p. что будет выдано на печать в результате выполнения следующих операторов? q^: =p^+1; if p< > q then p: =nil else q^: =10; if q^=10 then begin p: =q; q^: =20; end; writeln(p^);
После p^=5 оба указателя будут ссылаться на 5.
q^:=p^+1 приведет к тому, что cсылка будет на 6, поэтому в первом if условие ложно и выполняется ветка else и оба указателя будут ссылаться на 10.
Во втором if условие истинно, поэтому выполняется ветка then. В ней присваивание p:=q ничего не меняет, поскольку оба указателя и так уже указывают на одно и то же место в памяти. А после q^:=20 в это место будет записана константа 20, поэтому при выводе p^ мы получаем значение 20.
ответ: 20