Var a,b,x,s:integer;
begin
write('a = ');
readln(a);
write('x = ');
readln(x);
b:=a;
s:=0;
while b>0 do
begin
s:=s+b mod 10;
b:=b div 10;
end;
writeln('s = ',s);
if s>x
then writeln('Сумма цифр больше ',x)
else writeln('Сумма цифр не больше ',x);
end.
Пример:
<span>a = 31854
x = 15
s = 21
Сумма цифр больше 15</span>
В C++:
#include <iostream>
#include <ctime>
#include <iomanip>
int main()
{
using namespace std;
//размерность матрицы
const int N = 5;
int matrix[N][N];
srand(time(0));
int i, j;
//как-нибудь заполняем матрицу
for (i = 0; i < N; i++)
for (j = 0; j < N; j++)
matrix[i][j] = rand() % (N * N + 1) - (N * N / 2);
//вывод исходной матрицы на экран
for (i = 0; i < N; i++)
{
for (j = 0; j < N; j++)
cout << setw(4) << matrix[i][j];
cout << endl;
}
//проверка, есть ли вообще числа, чтобы умножать
int p = 0;
for (i = 0; i < N; i++)
for (j = 0; j < N; j++)
if (i > j && i > N - j - 1 && matrix[i][j] < 0)
{
p = 1;
break;
}
//подсчёт требуемого произведения
for (i = 0; i < N; i++)
for (j = 0; j < N; j++)
if (i > j && i > N - j - 1 && matrix[i][j] < 0)
p = p * matrix[i][j];
//нахождение модуля произведения
if (p < 0)
p = -p;
//вывод этого значения на экран
cout << "Multiplication: " << p << endl;
return 0;
}
б в д е, поскольку отдельно взятая цифра в числе не может превышать основание системы счисления. Например, вариант А ошибочен, так, как основание равно 6, а это значит что наибольшей цифрой в числе должно быть 5
2 про диаграмму и 4 еще похоже на правильное