Program abc;
var a,b,c,i,i1:integer;
begin
readln(a,b);
if(a<b) then
for i:=1 to b do
begin
i1:=i+1;
c:=i1+i;
end;
if(a>b) then
for i:=1 to a do
begin
i1:=i+1;
c:=i1+i;
end;
writeln(c);
end.
Текстовую, звуковую, <span>видеоинформацию </span>, графическую.
// PascalABC.NET 3.3
begin
var z:=ArrRandom(10,-50,50); z.Println;
var r:=z.Where(x->x>0).ToArray+z.Where(x->x<0).ToArray;
r.Println;
end.
Пример:
-46 42 -26 -23 8 50 -9 46 -50 0
42 8 50 46 -46 -26 -23 -9 -50
Ответ:
1.
Десятичное число в цикле делится на основание системы счисления.
из остатков от деления формируется число.
2.
107 (10)
14537 (11)
C3,5B (14)
3.
738 * 11 = 8118
5135 - 157 = 4978
4.
26428 (8) = 11544 (10) = 10110100011000 (2) = 2D18 (16)
Объяснение:
подробности перевода чисел из одной системы счисления в другие во вложении