Сложить двоичные числа 10010+111

Знания

Информатика

1 ответ:

авчпрол4 года назад

0 0

11001 в двоичной
вроде как

Читайте также

Составить программу которая определяет вторую цифру четырёхзначного числа, и заменяет её на 4

LizaKova [18]

Var
ch,otv,perv,last:Integer;
begin
WriteLn('Введите число');
readln(ch);
last:=ch mod 100;
ch:=ch div 100;
perv:= ch div 10;
ch:=ch div 10;
otv := perv*1000+4*100+last;
WriteLn('Ответ: ',otv)
end.

пж как лучший

0 0

4 года назад

1. В текстовом процессоре откройте файл Перемещение.rtf: CPU- RAM- HDD- Video Card — Sound Card — оперативная память, центральны

НадеждаРыб

CPU (Central Processing Unit) - Центральный процессор
RAM (Random Access Memory) - Оперативная память
HDD (Hard Disk Drive) - Жесткий диск
Video Card - Видеокарта
Sound Card - Звуковая карта

Вроде бы пары надо было составить.

0 0

4 года назад

Много баллов дам за решение..Треугольник задан координатами вершин, вычеслить периметр, площадь.вычеслить длин сторон, оформить

Semen3P

Program gt;
var x1,y1,x2,y2,x3,y3,a,b,c,p,s:real;
procedure dlinastoron(x1,y1,x2,y2:real;var b:real);
begin
b:=sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2));
end;
procedure perimetr(a,b,c:real;var d:real);
begin
d:=a+b+c;
end;
procedure ploshad(a,b,c:real;var d:real);
var s:real;begins:=(a+b+c)/2;
d:=sqrt(s*(s-a)*(s-b)*(s-c));
end;
begin
readln(x1,y1,x2,y2,x3,y3);
dlinastoron(x1,y1,x2,y2,a);
dlinastoron(x1,y1,x3,y3,b);
dlinastoron(x3,y3,x2,y2,c);
perimetr(a,b,c,p);
ploshad(a,b,c,s);
writeln(a,' ',b,' ',c);
writeln(p);
writeln(s);
<span>end.</span>

0 0

4 года назад

сообщение занимает 3 страницы по 25 строк. в каждой строке записано по 60 символов. сколько символов в использованном алфавите е

Nebelena [109]

<span>Считаем количество символов в сообщении:</span>

0 0

2 года назад

помогите плиз, Заполнить массив случайными числами в интервале [1000;2000) и подсчитать число элементов у которых вторая с конца

safronov [40]

var a:array [1..100] of integer;

i,n:integer;

s:string;

Begin

randomize;

for i :=1 to 100 do

begin

a[i]:= random(1000)+1000;

a[i]:=a[i] mod 100;

a[i]:=a[i] div 10;

if a[i] mod 2 = 0 then n=n+1;

end;

writeln(n);

End.

0 0

4 года назад