//Pascal
var
factorial: longint;
n, i: byte;
begin
write('n = '); readln(n);
factorial := 1;
for i:=2 to n do
factorial := factorial * i;
writeln('n! = ', factorial);
end.
Результат вычисления выражения = 43046746
В 3-ричной системе = 10000000000000221
Кол-во цифр 2 = 2
9^8 + 3^3 - 2 = <span>3^16 + 3^3 - 3^1 + 1
</span>3^16 (3) = 10000000000000000 => нет 2
3^3 - 3^1 (3) = 1000 - 10 = 220 => 2 двойки
+1 => не дает двоек
Ответ 2
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>
Int main ()
{
int x;
std::cin >>x;
if x>0 std::cout << "1" else
if x<0 std::cout << "-1" else
std::cout << "0";
return 0;
}
<em>Твёрдые носители информации</em> — это те источники информации, которые имеют форму.
Например: жёсткий диск, компакт диск, флешка и прочее.