Написать программу на языке паскаль точка м(х, у) принадлежит прямоугольнику, ограниченному прямыми х=2, у=1 и координатными осями.

Var   x, y: real;   isin: string; begin   readln(x, y);   if ((x < 0) or (x > 2) or (y < 0) or (y > 2)) then     isin : = 'не ';   writeln('m(', x, '; ', y, ') ', isin, 'принадлежит прямоугольнику'); end.

Кажется библиотека   иерархическая модель появилась впервые в результате обобщения структур данных языка кобол. в иерархических моделях основная структура представления данных имеет форму дерева. на самом высшем (первом)  уровне иерархии находится только одна вершина, которая называется корнем дерева. эта вершина имеет связи с вершинами второго уровня, вершины второго уровня имеют связи с вершинами третьего уровня и т.д. связи между вершинами одного уровня отсутствуют. следовательно, данные в иерархической структуре не равноправны – одни жестко подчинены другим.  доступ к информации возможен только по вертикальной схеме, начиная с корня, так как каждый элемент связан только с одним элементом на верхнем уровне и с одним или несколькими на низком. примером иерархической структуры может служить  книга, как иерархическая последовательность букв, которые объединяются в слова, слова – в предложения, предложения  –  в параграфы, затем в главы и т.д.

#include < iostream> using  namespace  std; int  main(){       int  n,a[10001],i,j,k=0,b;       cin> > n;       for(i=1; i< =n; i++)       {           cin> > a[i];       }       for(i=n; i> =1;           {               cout< < a[i]< < " ";           }       return  0; }