|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
03.05.2009, 16:35 | #1 |
Пользователь
Регистрация: 04.11.2008
Сообщений: 31
|
НУжна помощь с задачей. ДЕлфи
построить структуру изображенную на рисунке. Вывести на печать значения динамических переменных вещественного типапрога1.jpg
type point=^uk; uk=record first: pointer; second: point; end; procedure TForm1.Button1Click(Sender: TObject); var p: point; q1,q2,q3:real; begin new(p); q1:=3.7; p^.first:=@q1; p^.second:=p; q2:=4.8; p^.second^.first:=@q2; p^.second^.second:=p; q3:=5.9; p^.second^.second^.first:=@q3; p^.second^.second^.second:=nil; это моя версия Последний раз редактировалось stasig; 03.05.2009 в 16:37. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
нужна помощь в переписи программы из С++ в Делфи | andriano1984 | Помощь студентам | 1 | 30.06.2008 21:47 |
Графика в Делфи, требуется помощь с задачей | Natisha | Помощь студентам | 3 | 10.05.2008 00:25 |
Нужна помощь с задачей...никак не могу разобраться( | Gekata | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 13.12.2006 14:02 |