с информатикой.Пропишите решение из программы, как это решать это не в программе, а в ручную.Программа:program blablabla;var a: array[1..7] of real; s: real; i: integer; begin for i := 1 to 7 do read(a[i]); s := 0; for i := 1 to 7 do s := s + a[i]; writeln(s)end.

В чем суть во Объяснение:

Если вы про логику программы, то она считывает 7 чисел и выводит их сумму.

x > 2

x < 2

Объяснение:

Операция И имеет приоритет перед операцией ИЛИ

((Х < 3) и (X < 2)) или ((X > 2) и (X > 0))

Между двумя выражениями стоит операция ИЛИ, которая означает, что хотя бы одно из выражений должно быть истинным, чтобы всё выражение было истинным.

Возьмём первое выражение:

(Х < 3) и (X < 2)

Тут мы видим операцию И, которая указывает на то, что оба значения должны быть истинными, чтобы всё выражение было истинно, т. е. в данном выражении значение X должно быть < 2, чтобы выражение было истинным

(1 < 3) и (1 < 2) - true [истина]

(0 < 3) и (0 < 2) - true [истина]

и т. д.

Возьмём второе выражение:

(X > 2) и (X > 0)

Тут мы видим операцию И, которая указывает на то, что оба значения должны быть истинными, чтобы всё выражение было истинно, т. е. в данном выражении значение X должно быть > 2, чтобы выражение было истинным

(3 > 2) и (3 > 0) - true [истина]

(4 > 2) и (4 > 0) - true [истина]

и т. д.

Вернемся к тому, что между выражениями стоит операция ИЛИ, т. е. должны выполняться или левая, или правая часть. Приходим к итогу, что:

x > 2x < 2

begin

 var n: array of integer;

 setlength(n,11);

 writeln('Введите содержимое массива:');

 for var l:= 1 to n.high do read(n[l]);

 writeln('Наибольшее значение: ',n.max,' его номер: ',n.lastindexmax);

end.

begin

 var n:= ArrRandomInteger(10,1,99);

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

 var A:=n[n.High];

 n[n.High]:=n[n.Low];

 n[n.Low]:=A;

 writeln('Полученный массив: ',n);

end.

begin

 var n:= ArrRandomInteger(24,1,99);

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

 for var l:=n.Low+1 to n.High-1 do n[l]:=0;

 writeln('Полученный массив: ',n);

end.