Переведите десятичное число 77 в двоичную, семеричную и 13-ричную системы счисления.

1001101 - двоичная система

140 - семеричная система 

5c - тринадцатиричная система

Ок, всё это циклы. 1) цикл for  (цикл с счётчиком), при этом при каждом шаге цикла счётчик увеличивается на 1. пример: for a: =1 to 10 do //цикл будет выполнен 10 раз 2)  цикл for  (цикл с счётчиком), при этом при каждом шаге цикла счётчик уменьшается на 1. пример: for a: =10 to 1 do //цикл будет выполнен 10 раз 3)цикл с постусолвием. если условие не выполняется, выполняется цикл. его особенность заключается в том, что цикл выполнится хотя  бы один раз вне зависимости от условия. пример: k: =0; repeat inc(k); until k< 9 //10 раз 4)цикл с предусловием. пока условие выполняется, выполняется и цикл. пример: k: =0; while k< > 10 do inc(k); //10 раз

Program z1;     var i,j,n,m: integer;         a: array [1..100, 1..100] of integer; begin  write('введите кол-во столбцов - ');   readln(n);     write('введите кол-во строк - ');   readln(m);     for i: =1 to n do      a[i][1]: =1;   for j: =1 to m do    a[1][j]: =1;         for i: =2 to n do      for j: =2 to m do        a[i][j]: =a[i-1][j]+a[i][j-1];             for i: =1 to n do  begin    for j: =1 to m do      write(a[i][j],'     ');     writeln;   end; end.