var a:array[1..10,1..15]of integer;
i,j,n,x:integer;
begin
for 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 do
if a[i,j]=x then inc(n);
writeln(n);
end.
var a:array[1..10,1..15]of integer;
i,j,k:integer;
begin
for 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 do
if a[i,j] mod 2=0 then inc(k);
writeln(k);
end.
10010111=
2625252625262626
10000000=2625252525252525
10010010
=262525262525262520
<span>1.исполняемый последовательные действия по списку.
2. Компьютер.
У меня такие варианты</span>
Путь- набор символов, показывающий расположение файла в файловой системе, адрес каталога.
Примеры:C:\Users\jelly\Documents\BFH\Temp
C:\Intel\Logs
D:\Program Files (x86)\Adobe