Наглядное представление это, показ чего либо очень точно и понятно
var
a: array [1..25] of integer;
begin
for i: integer := 1 to 25 do
begin
a[i] := random(255);
writeln(i, ' => ', a[i]);
end;
writeln('-----------------------------------');
for i: integer := 1 to 25 do
begin
if (i mod 2 = 0) then
a[i] := a[i] * 2
else
a[i] := 0;
writeln(i, ' => ', a[i]);
end;
<span>end.</span>
Звуковая это ухо, зрительная-глаза, обонятельная это-нос
125(8)
+
375(8)
_______
522(8) 2(8) = 10(2) 5(8) = 101(2) -> 522(8) = 101 010 010(2)
237(8)
+
712(8)
________
1151(8) 1(8) = 001(2) 5(8) = 101(2) -> 1151(8) = 1 001 101 001 (2) - на каждую цифру разряда в восьмиричной системе приходится 3 бита в двоичной системе
Var n: integer;
<span>begin
</span><span> write('число: '); readln(n);
</span><span> repeat
</span><span> write(n mod 10);
</span><span> n:=n div 10;
</span><span> until n=0;
</span><span>end.
</span><span>
Ввод - вывод:
</span>число: 589
<span>985
</span>