
1)составить блок схему и программу для вычисления y и z по заданным формулам Y=2e^4x+arctg(x/a),
при a=5.1 Z=cosx^3+sin^2x, при x=3,29 2)Создать новый одномерный массив B из элементов исходной матрицы А(6,8), удовлетворяющие условию 0≤cosa<0,5. В полученном массиве поменять местами максимальные и минимальные

Ответы на вопрос

a=5.1;
x=3.29;
var
Y,Z:double;
begin
Y:=2*exp(4*x)+arctan(x/a);
Z:=cos(x*sqr(x))+sqr(sin(x));
Writeln('Y=',Y,', Z=',Z)
end.
Результат выполнения программы:
Y=1038354.42291114, Z=-0.472433980670957
const
m=6;
n=8;
var
a:array[1..m,1..n] of double;
b:array[1..m*n] of double;
i,j,k,imax,imin:integer;
t:double;
begin
// Инициализация А и формирование В
Randomize;
Writeln('Исходный массив A');
k:=0;
for i:=1 to m do begin
for j:=1 to n do begin
a[i,j]:=10*Random-5; { случайное число на [-5;5] }
Write(a[i,j]:8:4);
t:=cos(a[i,j]);
if (t>=0) and (t<0.5) then begin Inc(k); b[k]:=a[i,j] end
end;
Writeln
end;
// Вывод сформированного массива В
Writeln('Исходный массив В');
for i:=1 to k do Write(b[i]:8:4);
Writeln;
// Поиск максимума и минимума с последующим обменом их местами
imax:=1; imin:=1;
for i:=2 to k do
if b[i]<b[imin] then imin:=i
else
if b[i]>b[imax] then imax:=i;
t:=b[imax]; b[imax]:=b[imin]; b[imin]:=t;
// Вывод результирующего массива В
Writeln('Результирующий массив В');
for i:=1 to k do Write(b[i]:8:4);
Writeln
end.
Тестовое решение:
Исходный массив A
-1.6788 -0.7273 -3.4919 2.9903 -4.3249 -2.2230 -2.1157 0.9685
2.0515 4.6821 0.2794 -1.4624 4.9668 -3.5754 -3.4115 -0.5592
3.0535 1.1339 0.0992 -0.5307 -0.6266 2.2623 1.9578 -1.3175
-0.6154 3.6080 2.4223 -4.8354 -2.2978 3.8982 -2.2427 2.0410
-1.1019 -3.4703 -2.0104 -1.3044 0.7744 0.6897 3.1747 1.3257
-4.3942 -1.6707 -3.2494 -0.6551 3.4726 -0.2896 3.4154 1.9644
Исходный массив В
-1.4624 4.9668 1.1339 -1.3175 -4.8354 -1.1019 -1.3044 1.3257
Результирующий массив В
-1.4624 -4.8354 1.1339 -1.3175 4.9668 -1.1019 -1.3044 1.3257



1) Составим блок-схему для вычисления y и z по заданным формулам:
1. Начало программы 2. Ввод значения a (a = 5.1) 3. Вычисление y = 2e^4x + arctg(x/a) 4. Ввод значения x (x = 3.29) 5. Вычисление z = cos(x^3) + sin^2(x) 6. Вывод значений y и z 7. Конец программы
Программа:
```python import math
# Ввод значения a a = 5.1
# Вычисление y x = 3.29 y = 2*math.exp(4*x) + math.atan(x/a)
# Вычисление z z = math.cos(x**3) + math.sin(x)**2
# Вывод значений y и z print("Y =", y) print("Z =", z) ```
2) Создаем новый одномерный массив b из элементов исходной матрицы A(6,8), удовлетворяющих условию 0 ≤ cos(a) < 0.5. Затем меняем местами максимальный и минимальный элементы полученного массива b.
Программа:
```python import numpy as np
# Исходная матрица A (6, 8) A = np.random.rand(6, 8)
# Создание нового массива b b = [] for i in range(A.shape[0]): for j in range(A.shape[1]): if 0 <= np.cos(A[i, j]) < 0.5: b.append(A[i, j])
# Поиск максимального и минимального элементов в массиве b max_elem = max(b) min_elem = min(b)
# Замена максимального и минимального элементов местами max_idx = b.index(max_elem) min_idx = b.index(min_elem) b[max_idx], b[min_idx] = b[min_idx], b[max_idx]
# Вывод полученного массива b print("Массив b после замены максимального и минимального элементов:", b) ```


Топ вопросов за вчера в категории Информатика








Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili