Program;
Uses vincrt;
Var i,n: integer
Begin
i:=0;
writeln('n=');
Raedln(n);
If (n mod 2 = 1) then i:=i+1;
End.
Пусть n = 4 (всех цифр) ; k = 3 (из них сочетаний)
<span>A = n! / (n - k)! = 4! / (4-3)! = 24 </span>
<span>Ответ: 24 3-х значных числа.</span>
2) 2 Мбайт, 200 Кбайт, 1 Мбайт, 1000 Кбайт.
2 Мбайта ▬ 2048 Кбайт., 1 Мбайт ▬ 1024 Кбайт.
Выведится:
Привет,это я,умный компьютер
Я знаю,что 6*5=30