Регистрация
DOLBONAFT
29.06.2022 02:40
Информатика
Есть ответ 👍

ответить на вопросы. ​

207
383
Посмотреть ответы 1

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

karolinaivanova10
karolinaivanova10
4,5(43 оценок)
// pascalabc.net 3.2, сборка 1389 от 01.03.2017 // внимание! если программа не работает, обновите версию! begin   var a: =matrrandom(3,3,10,50);   a.println(3); writeln(3*a.colcount*'-');   a: =transpose(a);   a.println(3); writeln(3*a.colcount*'-');   var s: =0;   for var i: =0 to 2 do s+=a[i,i];   writeln('s=',s) end.   15 40 13   21 21 26   14 24 31   15 21 14   40 21 24   13 26 31 s=67

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