Program ToDec;
Uses crt;
var s:string;
n,l,i:integer;
function Pow(x,y:integer):integer;
begin
if y>0 then Pow:=Pow(x,y-1)*x
else Pow:=1;
end;
function ToDec(A : string) : integer;
var L : Byte;
begin
if A = '' then ToDec := 0
else begin
L := length(A);
case A[1] of
'0' : ToDec := ToDec(Copy(A, 2, L - 1));
'1' : ToDec := Pow(2, L - 1) + ToDec(Copy(A, 2, L - 1));
end;
end;
end;
begin
clrscr;
write('Введите двоичное число: ');
readln(s);
writeln('Это число в десятичной системе : ', ToDec(S));
readkey;
end.
Program ToDec;
Uses crt;
var s:string;
n,l,i:integer;
function Pow(x,y:integer):integer;
begin
if y>0 then Pow:=Pow(x,y-1)*x
else Pow:=1;
end;
function ToDec(A : string) : integer;
var L : Byte;
begin
if A = '' then ToDec := 0
else begin
L := length(A);
case A[1] of
'0' : ToDec := ToDec(Copy(A, 2, L - 1));
'1' : ToDec := Pow(2, L - 1) + ToDec(Copy(A, 2, L - 1));
end;
end;
end;
begin
clrscr;
write('Введите двоичное число: ');
readln(s);
writeln('Это число в десятичной системе : ', ToDec(S));
readkey;
end.
Бюджетный игровой сегмент
Платформа
модель
цена на момент публикации обзора, грн
AMD
MSI B450-A PRO MAX
2499
ASUS PRIME B450-PLUS
2611
GIGABYTE B450M S2H
1899
Intel
ASUS PRIME H310M-K R2.0
1591
ASUS PRIME B360M-K
1974
Средне-высокий ценовой сегмент – для гейминга на высоких настройках
Intel
ASUS PRIME Z390-P
3555
MSI Z390-A PRO
3365
GIGABYTE Z490M
4191
AMD
ASRock B550 PRO4
4412
MSI MAG B550 TOMAHAWK
5625
Высокий ценовой сегмент. Ультимативный гейминг. Видеомонтаж, работа со сложными вычислениями
Intel
ASUS ROG MAXIMUS XII APEX
15136
MSI MEG Z490 ACE
12574
AMD
ASUS ROG Crosshair VIII Impact
12999
ASRock X570 PHANTOM GAMING X
12325
MSI MEG X570 ACE
11421