Function Dec2n(dec,n:integer):string;
var
d:byte;
ch:char;
s,sgn:string;
begin
s:='';
if dec<0 then begin sgn:='-'; dec:=-dec end
else sgn:='';
while dec>0 do
begin
d:=dec mod n;
ch:=Chr(Ord('0')+d);
s:=ch+s;
dec:=dec div n
end;
Dec2n:=sgn+s
end;
var
m,n:integer;
begin
Write('Введитt целое десятичное число и основание для перевода (2-9): ');
Read(m,n);
Writeln(Dec2n(m,n))
end.
Тестовое решение
25 3
221
-38 9
-42
1875 кбайт * 1024 * 8 = 15 360 000 бит
800 * 600 * (ln(256)/ln(2)) = 3840000 бит
15360000 / 3840000 = 4 страницы
<span>Автопилот,интернет,запись на жесткий диск...</span>
Изи , Pentium G2020 , 2.9GHz - процессор
LGA1155 - сокет(socket)
ASUS P8B75- M LX PLUS - материнская плата
Intel B75 Chipset - чипсет процессора
Intel Pentium G2020 2.9GHZ - процессор
2048Mb DDR3 - оперативная память
250.0Gb - скорее всего либо жёсткий диск , либо ссд , (Hdd , либо SSD)
VENTO TA863 - блок питания
ATX/sound/LAN - скорее всего звуковая и сетевая карта
Какой класс?