Решите примеры в двоичной системе счисления, только с расчётами в столбик: а) 111+101 б) 11011+1110 - id953859320230403 от Dreamer0 03.04.2023 03:50

Question

Информатика: Решите примеры в двоичной системе счисления, только с расчётами в столбик: а) 111+101 б) 11011+1110 в) 0010001+1011101 г)11111111+11111111 а)111-101 б) 11011-011101 в) 10011010-1100101 г) 10101010-01010101

Dreamer0 · Accepted Answer

1)
var a,b,s:integer;
begin
Readln(a,b);
s:=0;
if (a<0)and(b<0) then
begin a:=-a; b:=-b; end;
if a<0 then for var i:=1 to b do s+=a
else for var i:=1 to a do s+=b;
WriteLn(s);
end.

Пример:
-7 15
-105

2)
var n,s:integer;
begin
Readln(n);
s:=0;
for var i:=1 to n do s+=i;
WriteLn(s);
end.

Пример:
100
5050

3)
var a,b,s:integer;
begin
Readln(a,b);
s:=0;
for var i:=a to b do s:=s+i*i;
writeLn(s);
end.

Пример:
2 5
54

4)
var a,b,n:integer;
begin
Readln(a,b,n);
for var i:=1 to n do write(random(b-a+1)+a,' ');
end.

Пример:
10 20 5
11 12 14 14 18

Решите примеры в двоичной системе счисления, только с расчётами в столбик: а) 111+101 б) 11011+1110 в) 0010001+1011101 г)11111111+11111111 а)111-101 б) 11011-011101 в) 10011010-1100101 г) 10101010-01010101

MOGZ ответил