Что надо вписывать в скобках чтоб программа получилась в приложении паскаль?program n_9;var x, a, b:real;beginwriteln('определение принадлежности точки отрезку');write('введите a, b>>');readln(a, b);write('введите x>>');readln(x);if (x>=a) and (x<=b)thenwriteln('точка принадлежит отрезку')else writeln('точка не принадлежит отрезку')end.

program n_9;

var x,a,b:real;

begin

writeln('определение принадлежности точки отрезку');

 writeln('введите a');

 readln(a);

writeln('введите b');

readln(b);

writeln('введите x');

readln(x);

if ((x>=a) and (x<=b)) then writeln('точка принадлежит отрезку')

else writeln('точка не принадлежит отрезку');

end.

Объяснение:

нужна была тчк с запятой после действия в else, в этом была ошибка. (еще ни разу не видела, чтобы переменные в паскале вводили через запятую, так что не рискуй.)

а это советы на будущее:

нормальные скобки в условиях.

ответ: Систе́ма — множество элементов, находящихся в отношениях и связях друг с другом, которое образует определённую целостность, единство. Сведение множества к единому — в этом первооснова красоты. Пифагор. Потребность в использовании термина «система» возникает в тех случаях, когда нужно подчеркнуть, что что-то является большим, сложным, не полностью сразу понятным, при этом целым, единым.

Объяснение:

Теперь перечислим основные свойства системы.

1) Целостность. Любую организацию можно рассматривать как интегрированное целое, в котором каждый элемент занимает строго определенное место.

Целостность - принципиальная несводимость свойств системы к сумме свойств составляющих ее элементов и невыносимость из последних свойств целого; зависимость каждого от его места, функции и т.д. внутри целого.

Функционирование целого должно приносить интегральный, суммированный эффект. Все элементы должны быть взаимосвязаны в рамках цели данной системы.

2) Иерархичность. Каждый компонент системы в свою очередь может рассматриваться как система, а исследуемая в данном случае система представляет собой один из компонентов более широкой, глобальной системы (рис. 6). Это напоминает ящик, в который сложены более мелкие коробки, мы открываем один и видим, что в нем содержится еще несколько.

Я в диалектах не очень, но вот вспомнил VB.net :)
 Sub Main()
        Dim a(10) As Integer
        Dim b As Integer = 1
        Dim c As Integer

        Dim R As Random = New Random()
        For i As Integer = 0 To 10
            a(i) = R.Next(12)
            Console.WriteLine("[" + i.ToString() + "] => " + a(i).ToString())
        Next

        For i As Integer = 0 To 10 
           If ((a(i) Mod 2 = 0) And (a(i) < 0)) Then b = b * a(i)
            If ((a(i) Mod 3 = 0) Or (a(i) Mod 5 = 0)) Then c = c + 1
        Next
        Console.WriteLine("Произведение чётных отрицательных: " + b.ToString())
        Console.WriteLine("Кол-во кратных 3 или 5: " + c.ToString())
        Console.Read()
    End Sub