Сформувати та надрукувати матрицю розмірності 9*9, кожен елемент якої розраховується за формулою a[i][j]=(i+1)*10+(j+1), де i- індекс рядка, j - індекс стовпця.
Иван: французский, китайский. Антон: немецкий, японский. Пётр: шведский, греческий. Поясняю на сколько это возможно. 2) Антон не знает шведский и французский. 3)Пётр (он самый высокий - пункт 1) не знает французский. Значит, французский - Иван. 4) Пётр не знает яп. и кит. 5) Антон не знает кит. и греч. 4),5) => китайский - Иван. С Иваном разобрались... 2),5) => Антон не знает греческий и шведский (фр. и кит. уже у Ивана). Значит, их знает Пётр. Антону, в таком случае, достаются немецкий и японский. Надеюсь, понятно.
Ну, без понятия на каком языке писать - задача не решаема.
Однако, на "метаязыке":
задать массив МАТРИЦА[5,5];
получить ввод в ВВОД;
если ВВОД = 's', то {
СУММА = 0;
X = 1;
продолжать, пока X <= 5 {
СУММА = СУММА + МАТРИЦА[X,X];
X = X + 1;
}
вывести СУММА;
} иначе, если ВВОД равен 'a' или 'b' или 'c', то {
X = 1;
продолжать, пока X <= 5 {
СреднАрифм = 0;
Y = 1;
продолжать, пока Y <= 5 {
СреднАрифм = СреднАрифм + МАТРИЦА[X,Y];
Y = Y + 1;
}
вывести СреднАрифм / 5;
X = X + 1;
}
} иначе, если ВВОД = 'm', то {
МИНИМУМ = МАТРИЦА[1,1];
МАКСИМУМ = МАТРИЦА[1,1];
X = 1;
продолжать, пока X <= 5 {
Y = 1;
продолжать, пока Y <= 5 {
если МАТРИЦА[X,Y] < МИНИМУМ то МИНИМУМ = МАТРИЦА[X,Y];
если МАТРИЦА[X,Y] > МАКСИМУМ то МАКСИМУМ = МАТРИЦА[X,Y];
Y = Y + 1;
}
}
вывести МИНИМУМ;
вывести МАКСИМУМ;
}