Var c,d,b,f:integer;
a,e:real;
Begin
a:=10;
e:=10;
f:=0;
while a<30 do
begin
a:=a+1/2;
b:=b+1;
end;
writeln(b);
while e<100 do
begin
e:=e+1/2;
f:=f+1;
end;
writeln(f);
<span>end.</span>
F421(16) - 62497(10)
12C.08(16) - <span>300.03125</span>(10)
1011.011(2) - 11.375(10)
25.4(8) - 21.5(10)
Перевод числа Х из 10-тичной системы в n-ичную осуществляется путем деления с остатком числа Х на n, затем Х1 = Х/n на n и тд (до тех пор, пока Хi больше 0) и записыванием остатков деления в обратном порядке. В нашем случае:
Х = 10, n = 2, \% - операция получения остатка от деления, / - операция получения целой части от деления.
1) 10 \% 2 = 0; 10 / 2 = 5
2) 5 \% 2 = 1; 5 / 2 = 2
3) 2 \% 2 = 0; 2 / 2 = 1
4) 1 \% 2 = 1; 1 / 2 = 0 => конец. Выпишем остатки в обратном порядке (т.е. из шагов 4), 3), 2) и 1)):
10 (в 10-ной) = 1010 (в 2-ной)
Проверка:
1010 (в 2-ной) = 1*2^3 + 0*2^2 + 1*2^2 + 0*2^0 = 8 + 0 + 2 + 0 = 10 (в 10-ной)
ПОТОМУ ЧТО microsoft office - гав....о, мягко говоря
а так, попробуйте в окне, в низу есть такой раздел как форматы. Кликаете туда и ставите jpg png и т.д., что вам нужно.
если не получилось то проверьте, правильно ли у файла расширение, а так же стоит ли галочка в свойствах - скрыть? если стоит то отключаете