Процедуры STR и VAL.

В строковую переменную можно записывать не только буквы, но и цифры. Однако это будут не числа, как таковые, а их символьное представление. Для преобразования символьных представлений числа в само число, и наоборот, используются процедуры STR и VAl.

...

Тип данных Boolean. Значения True, False в Pascal.

Мы рассмотрели с Вами целый тип данных (integer), вещественный тип (real), символьный (char). В этом уроке мы рассмотрим тип данных, который имеет большое значение в программировании. Логический тип – Boolean. Одной из особенностей этого типа данных ...

Логические операции And, Or, Not, Xor в Pascal.

Над переменными логического типа можно производить логические операции. В языке программирования Pascal существуют следующие логические операции : And – логическое умножение, Or – логическое сложение, Not – логическое отрицание, Xor – ...

Циклы и массивы

Манипулирование строками STRING.

В языке Паскаль при работе с текстами чаще всего используются короткие строки типа STRING. Стандартные процедуры READLN(St), WRITE(St) и WRITELN(St) поддерживают ввод и вывод строк переменной длины ...

Отображение на экране значений двумерного массива.

Если в результате работы вашей программы необходимо значения каждого элемента двумерного массива отобразить на экране монитора, то можно воспользоваться любым из двух способов, описанных ниже.

Оператор присоединения With . . Do.

Язык программирования Паскаль Категория: Уроки Паскаль. Записи.

Для того чтобы облегчить доступ к компонентам записи очень часто используют оператор присоединения With .  . Do.

 Использование оператора With . . Do.

  1. program zapisi4;
  2. uses crt;
  3. type opisanie=record
  4. marka: string[45];
  5. color: string[8];
  6. god_vip: integer;
  7. probeg: real;
  8. end;
  9. var auto: opisanie;
  10. begin
  11. clrscr;
  12. with auto do
  13. begin
  14. writeln ('Введите описание автомобиля ');
  15. writeln ('Введите марку автомобиля');
  16. readln (marka);
  17. writeln ('Введите цвет автомобиля');
  18. readln (color);
  19. writeln ('Введите год выпуска автомобиля');
  20. readln(god_vip);
  21. writeln ('Введите пробег автомобиля');
  22. readln(auto.probeg);
  23. writeln ('Все данные введены');
  24. writeln ;
  25. writeln (' Марка автомобиля: ', marka);
  26. writeln(' Цвет автомобиля: ', color);
  27. writeln(' Год выпуска автомобиля: ', god_vip);
  28. writeln(' Пробег автомобиля : ', probeg:6:0);
  29. end;
  30. readln
  31. end.

Возьмем в качестве примера код первой программы и вставим в него оператор With. . Do (строка №12). Записываем служебное With, далее указываем имя переменной, которая связана с типом Запись, затем служебное слово Do. После этого все операторы (строка №14 - №28) заключаем в операторные скобки Begin..End. Теперь для доступа к компоненту записи нам не нужно указывать имя переменной и имя компонента, достаточно указать лишь имя компонента.

with do

with do.

Использование оператора присоединения With..Do зависит от предпочтения программиста. На выполнения самой программы он никак не влияет.

Предыдущая статья : Вложенные записи.

Оглавление : Уроки Паскаль. Записи.

Следующая статья : Использование массивов записей.

Комментарии  

 
0 # Дима 30.11.2014 10:03
Теперь для доступа к компоненту записи нам не нужно указывать имя переменной и имя компонента, достаточно указать лишь имя компонента.

В строке №22 Записано: readln(auto.probeg);

Нужно ведь записать в таком виде: readln(probeg);
 
   ГлавнаяПаскальЗаписи в ПаскальОператор присоединения With . . Do.
Rambler's Top100