Проверить принадлежность символа записи - PascalABC.NET
Формулировка задачи:
Имеется запись вида:
Как можно проверить принадлежит ли символ "с" записи?
Решение задачи: «Проверить принадлежность символа записи»
textual
Листинг программы
var z:tItem;
c:char;
....................................
if c=z.sim then write('Принадлежит')
Объяснение кода листинга программы
- Объявлены две переменные: z и c.
- Тип переменной z - tItem, тип переменной c - char.
- Если значение переменной c равно значению переменной z.sim, то выводится сообщение
Принадлежит.