1. Какие условия называются вложенные
2 Перечислите структуру вложенных операторов if.
3. Каким образом выполняются вложенные оператора
4. Почему удобнее использовать специальный оператор switch?
5. Для чего используется default?
6. Для чего используется break?
7. Отсутствие default и break будет влиять на выполнение вложенного
оператора?
8. Чем отличаются вложенные условные операторы if и switch?​

Program razgovor;

uses crt;

var c1,c2,c3:integer;

    t1,t2,t3:integer;

begin

  Write('Введите цену разговора с первым пунктом, с1= ');

  Readln(c1);

  Write('Введите цену разговора со вторым пунктом, с2= ');

  Readln(c2);

  Write('Введите цену разговора с третьим пунктом, с3= ');

  Readln(c3);

  Write('Введите длительность разговора с первым пунктом, t1= ');

  Readln(t1);

  Write('Введите длительность разговора со вторым пунктом, t2= ');

  Readln(t2);

  Write('Введите длительность разговора с третьим пунктом, t3= ');

  Readln(t3);

  clrscr;

  Writeln('Общая стоимость разговора = ',c1*t1+c2*t2+c3*t3)

end.

var

  a:array[1..100, 1..100] of real;

  n, m, i, j:integer;

  Sr:real;

begin

  write('Введите количество строк матрицы '); readln(m);

  write('Введите количество столбцов матрицы '); readln(n);

  writeln('Исходный массив:');

  Sr := 0;

  for i := 1 to m do

  begin

    for j := 1 to n do

    begin

      a[i, j] := random(101) - 50;

      write(a[i, j]: 5:0);

      Sr := Sr + a[i, j];

    end;

    writeln;

  end;

  Sr := Sr / (n * m);

  writeln('Среднее арифметическое равно ', Sr);

  writeln('Элементы больше среднего арифметического:');

  for i := 1 to m do

    for j := 1 to n do

      if a[i, j] > Sr then

        writeln('a[', i, ', ', j, '] = ', a[i, j]);

end.