Регистрация
kurokislip
19.03.2020 05:11
Информатика
Есть ответ 👍

с дз по информатике ​

235
283
Посмотреть ответы 1

Ответы на вопрос:

КристинаКристи99
КристинаКристи99
4,5(31 оценок)
Program gt; var n,i,j: integer; a: array[1..100,1..100]of real; s: real; begin readln(n); for i: =1 to n do for j: =1 to n do begin read(a[i,j]); if(i=j)then s: =s+a[i,j]; end; writeln(s); end.

Популярно: Информатика