:*дан двумерный массив вывести на экран все элементы n-й строки массива паскаль

Var a: array [1..8,1..8] of integer;           j,k,n: integer; begin   randomize;   for j: =1 to 8 do       begin           for k: =1 to 8 do               begin                   a[j,k]: =random(9)+1;                   write (a[j,k]: 2);               end;           writeln;       end;   repeat       write ('n = ');       readln (n);   until n in [1..8];   for j: =1 to 8 do write (a[n,j]: 3);   writeln;   readln; end.

program xxx;

  var n, c, d, e, s : integer;

begin

    write('введите число');

    readln(n);

    c: = n div 100;

    d: =(n div 10) mod 10;

    e: = n mod 10;

    s: = c + d + e;

    writeln('сумма чисел =', s);

    readln

end.

с компьютера можно редактировать фотографии, создавать тексты, пользоваться интернетом, создавать графические изображения,

делать видео монтаж и.т.д.

  если использовать компьютер не по назначению или скачивать с интернета файлы опасные для компьютера может быть компьютерный вирус. чтобы не было вируса можно приобрести антивирус или вообще не скачивать что попало.