Uses crt;var a,b:real;beginwriteln('Введите сколько тон вы хотите переплавить');readln(a);b:=(10/18)*a;writeln(b,'Тон получится ');end.
Если 11, то минимальное основание 2, а если 99, то 10
Var n,i,k,s1,s2:integer;
begin
write('n='); readln(n);
s1:=n; s2:=0;
for i:=1 to n-1 do
begin
write('k',i,'='); readln(k);
s1:=s1+i; s2:=s2+k;
end;
writeln('Потерялась карточка ',s1-s2);
<span>end.
Пример:
n=5
k1=1
k2=3
k3=4
k4=5
<span>Потерялась карточка 2
</span></span><span><span>
</span></span>
... Каждый начал приводить аркументы, мол, я лучше потому-то - потому-то.
Без клавиатуры мы бы не смогли печатать, то есть не смогли бы передавать информацию на компьютер, без монитора мы бы не смогли видеть эту самую информацию, без памяти мы бы не могли сохранить ее (информацию), а без процессора и вовсе компьютер не стал бы работать.
И клавиатура, и монитор, и память, и процессор - все они неотъемлимые части компьютера, без них он бы не работал.
№1
а) 101011111<span> + </span>111101<span> = </span>110011<span>100
б) </span>101011111 - 111101 = 100100010
в) 101011111<span> × 1</span>001<span> = </span>110001010<span>111
</span>№2
927 (10)<span> = 1</span>021100 (3) = 12202 (5) = 2463 (7) = 1<span>240 (9)
</span>№3
AC6 (16) - 432 (6) + 723 (9) - 444 (5) = AC6 (16) - A4 (16) + 24C (16) - 7C (16) = <span>BF2 (16)</span>