Если основание системы счисления равно N, то для записи чисел в этой системе используются цифры от 0 до N-1, то есть наибольшая цифра равна N-1. Например для нашей родной десятичной системы N=10, используются 10 цифр 0 1 2 3 4 5 6 7 8 9, наибольшая из них 9. И наоборот, если наибольшая цифра в записи числа равна N-1, то минимально возможное основание системы счисления на единицу больше, то есть равно N.
Анализируем:
Число 1010: наибольшая цифра = 1, минимальное основание = 2
Число 7817: наибольшая цифра = 8, минимальное основание = 9
Число 1023 - наибольшая цифра = 3, минимальное основание = 4
Число 6767 - наибольшая цифра = 7, минимальное основание = 8
Ответ:
1010 -------- 2
7817 -------- 9
1023 -------- 4
6767 -------- 8
Программа приложена файлом для Visual Basic for Applications
Ниже текст этой программы продублирован
Sub trans_sequence(ByVal M)'заполнение массива и создание преобразованной последовательности чисел N = M Dim mas() ReDim mas(M) Sg = "" Sf = "" Randomize For i = 1 To M mas(i) = Round((Rnd(100) - 0.5) * 100) Sg = Sg + Str(mas(i)) If (mas(i) < 0) Then mas(i) = mas(i) * mas(i) Sf = Sf + Str(mas(i)) If i <> M Then Sg = Sg + "," Sf = Sf + "," End If Next i MsgBox "последовательность чисел " + Sg + Chr(10) + "преобразованная последовательность " + SfEnd Sub
Sub test() trans_sequence (25)End Sub
Вроде бы так... подправь если что)
uses crt;
const N=10;
var i,p:integer; a:array[1..N] of integer; {кол эл массива }
begin
p:=0;
writeln('введите исходный массив');
for i:=1 to N do {цикл по кол э}
begin
write('a[',i,']='); readln(a[i]); {ввод эл массива}
if (a[i] mod 2)=0 then p:=p+1;
end;
write('p='); writeln(p);
readln
end.
B) power(4, 2.5) + sqrt(1148.25 - power(1.1, 4)) / (156*cos(25*pi/180) + 2.6)
c) 148/abs(2.6 - power(1.4, 3)) + 18.1
2. √(ab) + 2a
---------------
b^2 + 2.3
3. var a: integer, V: integer
BEGIN
write ('Vvedite rebro a'); readln (a);
V = a*a*a;
writeln ('Ob'em kuba V = ', V);
END.
Если быть совершенно точным, то условные операторы switch-case.
Отличаются от if тем, что if проверяет некое условие (ЛЮБОЕ условие), а блок switch-case сначала задает значение - switch (значение), а потом сравнивает его с условиями в case.
Следовательно, к примеру:
if (n == 5) ...
if (n == 2) ...
if (n == -3) ...
будет эквивалентно
switch (n) {
case 5:
...
break;
case 2:
...
break;
case -3:
...
break;
}
Учтите, что в switch-case ожидается использование break. Если не поставить break, case, который ниже текущего, тоже будет выполнен.