Регистрация
SA67WQTBLOCK
28.01.2023 23:30
Информатика
Есть ответ 👍

вспомните функции часто используемых инструментов Заполните таблицу инструмент прямоугольник инструмент звезда многоугольник инструмент как инструмент текст инструмент контур инструмент выбор​

178
477
Посмотреть ответы 1

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

АринаВарданян
АринаВарданян
4,4(31 оценок)

var a: array[1..10,1..15]of integer; i,j,n,x: integer; beginfor i: =1 to 10 do for j: =1 to 15 do a[i,j]: =random(101); for i: =1 to 10 do begin for j: =1 to 15 do write(a[i,j],' '); if j=15 then writeln; end; readln(x); for i: =1 to 10 do for j: =1 to 15 doif a[i,j]=x then inc(n); writeln(n); end.

 

var a: array[1..10,1..15]of integer; i,j,k: integer; beginfor i: =1 to 10 do for j: =1 to 15 do a[i,j]: =random(101); for i: =1 to 10 do begin for j: =1 to 15 do write(a[i,j],' '); if j=15 then writeln; end; for i: =1 to 10 do for j: =1 to 15 doif a[i,j] mod 2=0 then inc(k); writeln(k); end.

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