Напишите программы на паскаль. 1) даны два числа. если они равны, то найдите сумму их квадратов, иначе - вычислить их произведение. 2) даны два числа. если они оба отрицательны, то найти сумму их квадратов, иначе - вычислить модуль их разности.

228

296

Посмотреть ответы 1

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

sanya1130

Информатика

4,6(10 оценок)

Вc++ #include < iostream> #include < iomanip> int main() { const int n = 5; const int m = 3; int a[n][m]; for (int i = 0; i < n; i++) //заполняем как-нибудь массив for (int j = 0; j < m; j++) a[i][j] = (i - 3) * (j + 3); for (int i = 0; i < n; i++) //выведем исходную матрицу на экран { for (int j = 0; j < m; j++) std: : cout < < std: : setw(4) < < a[i][j]; std: : cout < < '\n'; } int maxel = a[0][0]; int indexmax = 0; for (int i = 0; i < n; i++) //найдем максимальный элемент { for (int j = 0; j < m; j++) if (a[i][j] > maxel) { maxel = a[i][j]; indexmax = i; //номер строки с максимальным элементом } } int minel = a[0][0]; int indexmin = 0; for (int i = 0; i < n; i++) //найдем минимальный элемент { for (int j = 0; j < m; j++) if (a[i][j] < minel) { minel = a[i][j]; indexmin = i; //номер строки с минимальным элементом } } for (int j = 0; j < m; j++) //меняем строки { int temp; temp = a[indexmax][j]; a[indexmax][j] = a[indexmin][j]; a[indexmin][j] = temp; } std: : cout < < "\n\n"; for (int i = 0; i < n; i++) //выведем полученную матрицу на экран { for (int j = 0; j < m; j++) std: : cout < < std: : setw(4) < < a[i][j]; std: : cout < < '\n'; } return 0; }