Племя Мульти пишет письма, пользуясь 16 символьным алфавитом. Племя Пульти пользуется 32 символьным алфавитом. Вожди племён обменялись письмами. Письмо племени Мульти содержит 120 символов, а письмо племени Пульти 96. Сравните информационные объёмы сообщений.
#include <iostream>
using namespace std;
int main()
{
int n;
cin >> n;
int maxdigit = 0;
while (n > 0) {
int digit = n % 10;
if (digit > maxdigit)
maxdigit = digit;
n /= 10;
}
cout << maxdigit;
return 0;
}
Уровень D
#include <iostream>
using namespace std;
int main(){
int n;
cin >> n;
int prev = -1;
while (n > 0) {
int digit = n % 10;
if (digit == prev) {
cout << "YES";
return 0;
}
prev = digit;
n /= 10;
}
cout << "NO";
return 0;
}
ответ:
uses crt;
var a: array[1..20,1..20] of real;
n,m,i,j: integer;
s: real;
begin
clrscr; randomize;
write('введите кол-во строк: '); readln(n);
write('введите кол-во столбцов: '); readln(m);
for i: =1 to n do
begin
for j: =1 to m do
begin
a[i,j]: =random(100)/10;
write(a[i,j]: 4: 1);
end;
writeln;
end;
for i: =1 to n do
begin
s: =0;
for j: =1 to m do
s: =s+a[i,j];
writeln('сумма ',i,'-ой строки: ',s: 0: 1);
end;
for j: =1 to m do
begin
s: =0;
for i: =1 to n do
s: =s+a[i,j];
writeln('сумма ',j,'-ого столбца: ',s: 0: 1);
end;
for j: =1 to m do
begin
s: =0;
if j mod 2 = 0 then
begin
for i: =1 to n do
s: =s+a[i,j];
writeln('среднее арифметическое ',j,'-ого столбца: ',s/m: 0: 1);
end;
end;
readln;
end.
объяснение: