Program abc;
const<span> arr: array [1..4] of array [1..4] of integer = ((1,2,3,4),(5,6,7,8),(9,10,11,12),(13,14,15,16));
</span>var<span> i, j: integer;
</span>begin
<span>
for i := 1 to 4 do
</span><span> begin</span><span>
for j := 1 to 4 do
</span><span> begin
</span><span> write(arr[i][j], ' ');
</span><span> end;
</span><span> writeln();
</span><span> end;</span>
<span> writeln();
</span><span>
for i := 1 to 4 do
</span><span>begin
</span><span> j := arr[2][i];
</span><span> arr[2][i] := arr[3][i];
</span><span> arr[3][i] := j;
</span><span> end;
</span><span> for i := 1 to 4 do
</span><span>begin
</span><span> for j := 1 to 4 do
</span><span> begin
</span><span> write(arr[i][j], ' ');
</span><span> end;</span><span>
writeln();
</span><span> end;
</span><span>end.</span>
1. 1
2. архиватор
3. 3
4. 2
5. программа
Откуда знак @ произошёл никто не знает. Есть гипотеза, что это сокращение латинского предлога ad.
В испанском, португальском и французском @ - старинная испанская мера веса. Арроба.
Одна из версий происхождения названия "собака" - на цифровых мониторах компьютеров серии ДВК хвостик этого символа был очень короткий. Поэтому и был похож на собачку.
Другая говорит, что происхождение этого названия связано с игрой Adventure, в которой игрока сопровождал пёс, который обозначался символом @.
Ответ:
Ответ 8
Объяснение:
Приведем выражение к следующему виду:
(x > 7) & (x <20).
Наименьшим значением в данном промежутке будет 8.
Program qq;
const n=15;
var a:array[1..n] of Integer;
i:Integer;
begin
for i:=1 to n do begin
a[i]:=random(70-20);
write(a[i]:4);
end;
writeln;
for i:=1 to n do begin
if a[i] mod 2 = 0 then a[i]:=0;
write(a[i]:4);
end;
end.
