Кто решит, тот молодечик!

Дана матрица ( массив ) A(N;M). Вывести на экран массив A(N;M) и сумму элементов этого массива, находящихся в строке х. Размеры массива A(N;M) и номер строки х вводятся с клавиатуры, а элементы задаются ГСЧ (RANDOMIZE)

uses crt;var a:array [1..99, 1..99] of integer;i,j,n,m,x,z:integer;beginclrscr;randomize();z:=0;writeln('Введите количество строк');readln(n);writeln('Введите количество столбцов');readln(m);writeln('Введите номер строки');readln(x);for i:=1 to n dofor j:=1 to m dobegina[i,j]:=random(10);if x=i then z:=z+a[i,j];end;for i:=1 to n dobeginfor j:=1 to m dowrite(a[i,j]:2, ' ' );writeln();writeln;end;writeln('Сумма ',x,' строки=',z);readln();end.