Поскольку в восьмеричной системе на две цифрвы меньше, чем в десятичной, при сложении перенос в старший разряд происходит на две единицы раньше, следовательно и результат в каждом разряде получается на два больше. А так - все то же самое.
Аналогично, при вычитании мы "занимаем" в старшем разряде не 10, а 8, поэтому и результат вычитания в разряде получается на два меньше, чем в десятичной системе
Var s,i:integer;
begin
write('s = ');
readln(s);
for i:=100 to 999 do
if (i div 100 + i div 10 mod 10 + i mod 10 < s)
then write(i,' ');
end.
Пример:
<span>s = 5
100 101 102 103 110 111 112 120 121 130 200 201 202 210 211 220 300 301 310 400 </span>
Если это паскаль
диапазон вводится с клавиатуры
program pr1;
var a,b,x:integer; p:longint;
begin
writeLn('введите диапазон'); read(a,b);
x:=a;
while (x div 10)=0 do
inc(x);
p:=x;
inc(x);
while x<=b do
begin
p:=p*x;
inc(x);
end;
writeLn('p=',p);
<span>end.</span>
Любого графического редактора? Ластик , заливка , пипетка( она же выбрать уже существующий на экране цвет) , лупа , карандаш , кисточка , распылитель ,палитра.
CD-ROM (англ. Compact Disc Read-Only Memory, читается: «сиди-ро́м») — разновидность компакт-дисков с записанными на них данными, доступными только для чтения (read-only memory — память «только для чтения»)
Позже были разработаны версии с возможностью как однократной записи (CD-R Compact Disc-Recordable) и многократной перезаписи (CD-RW Compact Disc-ReWritable, Перезаписываемый компакт-диск) информации на диск.