Определите размер описанного ниже масива и тип элементов А: areey [-11 ... 8]of real;

Program2. pas (29) : Нельзя преобразовать тип function (x: real; eps: real) : real к real var a, i, s, r, j, t, x, eps: real; function v (x, eps: real) : real; begin i : = 1; s : = 0; a : = 1; t : = 1; r : = 1;

Определите размер описанного ниже массива и тип элементов 1) A: array[1 ... 10] of real; 2) A: array[-11 ... 8] of real; 3) A: array[1 ... 20] of integer; 4) A: array[-10 ... 10] of integer;

Сократите эту программу program sr; var a, b, c : real; y, x, xb, xc : real; na, nb, nc: integer; function stup (x: real; n: integer) : real; var i: integer; k: real; begin k:=1; for i : = 1 to n do k : = k * x; stup : = k; end;

Составить программу для ввода десяти элементов масива и подстета суммы отрицательных чисел масива

Определить значение переменной у после выполнения следующих фрагментов программы: a) Var у : real; i : integer; у : = 1; i : = 5; while i> 2 do i: = i - 1; y:=y + 1 * i; b) Var у : real; i : integer; у : = 1; i : = 2; repeat i: = 2 * i;