Const n = 20; var a: array[1..n] of integer; i, s: integer; begin randomize; for i : = 1 to n do begin a[i] : = random(20) + 20; write(a[i], ' '); if i mod 2 = 1 then s : = s + a[i]; end; writeln(); writeln(s); end.
akudryashov
10.01.2020
Const n=5; var ma: array[1..n,1..n] of integer; ar: array[1..n*n] of integer; i,j,k: integer; begin randomize; writeln('matrix: '); for i: =1 to n do begin for j: =1 to n do begin ma[i,j]: =random(5); write(ma[i,j]: 4); end; writeln; end; writeln('result: '); for i: =1 to n-1 do for j: =1 to n-i do begin inc(k); ar[k]: =ma[i,j]; end; for i: =1 to k do write(ar[i]: 4); end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Опишіть чим проект відрізняється від моделі? що передує - модель чи проект?