1 var a, b, c, n, i: integer;
2
3 begin
4 writeln('Vvedite N');
5 readln(n);
6 a :=1; b :=1;
7 for i := 3 to n do begin
8 c := a + b;
9 a := b;
10 b :=c;
11 end;
12 writeln(c);
13 end.
//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
begin
var a:=matrixRandom(4,4);
Println(a);
var s:=0;
for var i:=0 to 3 do
for var j:=0 to 3 do s:=s+a[i,j];
println(s);
end.
Число 15
15=1111
число 58
58=111010
105(10) = 1101001(2)
358(10) = 101100110(2)
377(10)<span> = 101111001(</span><span>2)</span>
1. 9379 из десятичной в двоичную:
10010010100011
2. 9379 из десятичной в восьмеричную:
22243
3. 9379 из десятичной в шестнадцатеричную:
24А3