#include <iostream>
<span>using namespace std;
</span>void mxd(int n) {
<span> int k,mx=0;
</span><span> do {
</span><span> k=n%10; n/=10;
</span><span> if (k>mx) mx=k;
</span><span> }
</span><span> while (n>0);
</span><span> cout<<mx<<endl;
</span><span>}
</span><span>int main() {
</span><span> int n;
</span><span> cout<<"number: "; cin>>n;
</span><span> mxd(n);
</span><span> </span><span /><span>system("pause");
</span><span> return 0;
</span><span>}
</span><span>
</span>
Иван составляет 5-буквенные слова, а использует для их составления он 7 букв.
На первой и последней позициях могут стоять только 3 буквы, а внутри слова они стоять не могут.
Следовательно, на 1 месте может стоять 3 буквы, на втором - 4 буквы, на третьем тоже 4 буквы, на четвертом 4 буквы, и на 5 месте может стоять 3 буквы. Найдём произведение:
3 * 4 * 4 * 4 * 3 = 9 * 64 = 576
Ответ: 576 слов
{Автор: Рудницкий В. Л.
Ограничения: Последовательность не может быть длинее NN.
Откуда: Олимпиада, KZ, 2016.}
const NN = 10000;
var a : array [1 .. NN] of integer; i, j, d, N: integer;
begin
write('Введите длину массива: '); readln(N);
writeln('Введите массив чисел через пробел:');
for i := 1 to N do read( a[i] );
{ Удаляем повторы чисел }
for i := 1 to N-1 do
for j := i+1 to N do
if a[i] = a[j] then a[j] := 0;
{ Создаем последовательность заполняя не нужные числа нулями }
for i := 2 to N do if ( a[i-1] > a[i] ) and ( a[i] <> 0 ) then a[i] := 0;
{ Суммируем не нулевые элементы }
d := 0; for i := 1 to N do if a[i] <> 0 then d := d + 1;
writeln('Максимальная длинна массива после удалений: ',d);
end.
<span>последовательность :</span> А, Б, В, Е, Г, Д, Ж.
Uses crt;
const N=6;
var a, b, c, d, e,sum,f,j,i:real;
begin
repeat
writeln('Введите 6 чисел');
readln(a,b,c,d,e,f);
sum:=(a+b+c+d+e+f);
j:=sum/N;
writeln('Среднее арифметическое чисел = ',j);
writeln('Хотите повторить программу еще раз? Если да - нажмите 1 ,если нет - нажмите 2');
readln(i);
until i=2;
end.