Функция ОКРУГЛ округляет число до указанного количества разрядов:
1) если число разрядов больше 0, то число округляется до указанного количества дробных разрядов (справа от запятой)
2) если число разрядов равно 0, то число округляется до ближайшего целого
3) если число разрядов меньше 0, то число округляется до указанного количества целых разрядов (слева от запятой)
ОКРУГЛ(число; число разрядов)
Тут числом выступает данное выражение: (94+110)-2*(73/(4+11)), а для округления до сотых указывается число 2 (после точки с запятой)
Также число можно округлить отрегулировав количество знаков после запятой до нужного (Главная - Число (Числовой формат) - Уменьшить разрядность (Увеличить разрядность)), но только дробные разряды до целого числа
const nx = 20; var x: array[1..nx, 1..nx] of integer;z:array[1..nx*2] of integer; i, j, k,n,r,t: integer; begin Writeln('Введите размер матрицы n');Read(n); for i := 1 to n do begin for j := 1 to n do begin Read(k);x[i, j] := k; end;end; Writeln('Исходный массив'); for i := 1 to n do begin for j := 1 to n do begin Write(x[i, j]:4); if x[i, j]>0 then begin t:=t+1; z[t]:=x[i, j];end; end; Writeln; end; Writeln;Writeln('Одномерный массив'); for j := 1 to t do Write(z[j]:4); end.
// PascalABC.NET 3.0, сборка 1139 от 10.01.2016 begin var n:=ReadInteger('Количество элементов в массиве: '); var a:=ArrRandom(n,-50,50); a.Println(','); Writeln('Четные элементы: '); var i:=1; while i<n do begin Write(a[i],' '); Inc(i,2) end; Writeln; Writeln('Нечетные элементы: '); i:=0; while i<n-1 do begin Write(a[i],' '); Inc(i,2) end; Writeln end.
Тестовое решение: Количество элементов в массиве: 10 15,-18,-29,-25,46,21,-8,-17,-9,15 Четные элементы: -18 -25 21 -17 15 Нечетные элементы: 15 -29 46 -8 -9
194,27
Формула для вычисления и округления:
=ОКРУГЛ((94+110)-2*(73/(4+11));2)
Объяснение:
Функция ОКРУГЛ округляет число до указанного количества разрядов:
1) если число разрядов больше 0, то число округляется до указанного количества дробных разрядов (справа от запятой)
2) если число разрядов равно 0, то число округляется до ближайшего целого
3) если число разрядов меньше 0, то число округляется до указанного количества целых разрядов (слева от запятой)
ОКРУГЛ(число; число разрядов)
Тут числом выступает данное выражение: (94+110)-2*(73/(4+11)), а для округления до сотых указывается число 2 (после точки с запятой)
Также число можно округлить отрегулировав количество знаков после запятой до нужного (Главная - Число (Числовой формат) - Уменьшить разрядность (Увеличить разрядность)), но только дробные разряды до целого числа