Додаток А.2 Результат виконання довідкової програми компонентів Delphi
Додаток Б Програма обчислень над одновимірним масивом
У масиві D знайти суму всіх елементів. Якщо ця сума менша від нуля, то у цьому масиві замість від’ємних елментів записати їх абсолютні значення, в іншому випадку замість додатних елементів записати їх значення з протилежним знаком. Обчислити добуток і координати перших восьми елементів та суму перших шеси елементів. Визначити з них менше значення і добути з них корінь кубічний.
Додаток Б.1 Лістинг програми обчислень над одновимірним масивом
#include <iostream>
#include <conio.h>
using namespace std;
int s(0);
void init(double array[], int n) {
cout << "Vvedit 10 chusel: ";
for (int i(0); i < n; i++) {
cin >> array[i];
s += array[i];
}
if (s < 0) {
for (int i(0); i < n; i++) {
if (array[i] < 0)
array[i] = abs(array[i]);
cout << array[i] << " ";
}
} else {
for (int i(0); i < n; i++) {
if (array[i] > 0)
array[i] = -array[i];
cout << array[i] << " ";
}
}
}
void calc(double array[], int D, int S) {
cout << "\nObchuslennja: ";
for (int i(0); i < 8; i++) {
D *= array[i];
}
for (int i(0); i < 6; i++) {
S += array[i];
}
if (S > D)
cout << "Sqrt D = " << sqrt(D);
else cout << "Sqrt S = " << sqrt(S);
}
int main() {
const int n = 10;
double *array = new double[n], D(1), S(0);
init(array, n);
calc(array, D, S);
_getch();
return 0;
}
Додаток Б.2 Результат виконання програми обчислень над одновимірним масивом
Додаток В Програма обчислень над матрицями
У матриці С знайти мінімальний від’ємний елемент та його координати. Обчислити наву матрицю, елементи якої дорівнюють добуткам елементів матриці С на мінімальний від’ємний елемент.Знайти кількість та координати додатних елементів у новій матриці, а також середнє значення цих додатних елементів. Обчислити добуток від’ємних елементів нової матриці і добути з нього корінь кубічний.
Додаток В.1 «Лістинг програми обчислень над матрицями»
#include <iostream>
#include <conio.h>
using namespace std;
const int n(5);
double calc(int sum, int mult, int array[n][n]) {
double y;
cout << "Sum = " << sum << "\nMult = " << mult;
sum > mult ? y = log(sum) : y = pow(mult, 2);
cout << "\nValue = " << y;
return y;
}
int main() {
int array[n][n], nArray[n][n];
int sum(0), mult(1), min(999), p, k;
for (int i(0); i < n; i++) {
cout << "Vvedit " << i+1 << " rjadok: ";
for (int j(0); j < n; j++) {
cin >> array[i][j];
if (array[i][j] > min) {
min = array[i][j];
p = i;
k = j;
}
}
}
int count(0), c(0), d(1);
for (int i(0); i < n; i++) {
for (int j(0); j < n; j++) {
nArray[i][j] = array[i][j] * min;
if (nArray[i][j] > 0) {
count++;
cout << "\nnArray[" << i << "][" << j << "] = " << nArray[i][j];
c += nArray[i][j];
}
if (nArray[i][j] < 0)
d *= nArray[i][j];
}
}
cout << "> 0 = " << count;
cout << "\nSerednje = " << c/count;
cout << "\nDobutok = " << sqrt(d);
_getch();
return 0;
}