Регистрация
MercerNani
20.02.2020 16:10
Информатика
Есть ответ 👍

Напишите в питоне програму часы ​

117
362
Посмотреть ответы 1

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

гвониха
гвониха
4,8(20 оценок)

program pr1; uses crt; var mas: array[1..10,1..10] of integer; i,j,b: integer; beginclrscr; randomize; for i: =1 to 10 dofor j: =1 to 10 do mas[i,j]: =random(10); for i: =1 to 10 dofor j: =1 to 10 do begin gotoxy(j,i); write(mas[i,j]); end; b: =0; for i: =1 to 10 dofor j: =1 to 10 do if (j=i) and (mas[i,j]=0) then b: =b+mas[i,j]; writeln; writeln(b); end.

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