Апгрейд
///////////////////////////////////
5*2=10, 10-3=7, 7*2=14, 14-3=11
Команда 2121
Program massa;var m, a: real; begin writeln('Введите массу.'); readln(m); writeln('Введите единицу измерения массы. 1 - килограмм, 2 - миллиграмм, 3 - грамм, 4 - тонна, 5 - центнер.'); readln(a); writeln('Введённое вами значение равно '); if a=1 then write(m, ' килограмм.'); if a=2 then write(m/1000000, ' килограмм.'); if a=3 then write(m/1000, ' килограмм.'); if a=4 then write(m*1000, ' килограмм.'); if a=5 then write(m*100, ' килограмм.'); end.
меее, немного с окончаниями напортачила, но если надо, то можно просто до кг сократить и всё будет ок
343 (8сс) = 11 100 011 (2сс)
<span> в двоичной= 10</span>000<span>111
в восьмеричной=</span><span>207
шестнадцатеричной =</span><span> 87</span>