Program arrays;
var a:array [1..3,1..6] of integer;
i,j:byte;
begin
for i:=1 to 3 do
for j:=0 to 1 do
begin
a[i,1+3*j]:=random(101)+10;
a[i,2+3*j]:=random((1001)+100) div (i+2*j);
a[i,3+3*j]:=(random(101)+10) mod 10;
end;
for i:=1 to 3 do
begin
for j:=1 to 6 do
write(a[i,j],' ');
writeln;
end;
end.
//Если нужны пояснения - пишите
Значение s останется = 1, так как цикл не выполнится ни разу
Program dfg;
var
b,x,y:integer;
a:array [1..10] of integer;
d:real;
begin
randomize;
for x:=1 to 10 do
begin
y:=random(10);
a[x]:=y;
writeln ('числа случайные = ',y);
end;
a[1]:=a[1] xor a[10];
a[10]:=a[1] xor a[10];
a[1]:=a[1] xor a[10];
for x:=1 to 10 do
begin
writeln ('числа случайные после смены = ',a[x]);
end;
<span>end.</span>
А) Объёмы тождественных понятий совпадают. Иначе, из тождественных понятий мы получаем одно и то же знание фиксированного объёма
Пример: "Столица России" тождественно "Город Москва".
Б) Объемы пересекающихся понятий совпадают частично, т.е. у них есть некая общая часть. Пример: "Школьные предметы" и "Информатика". Информатика - один из школьных предметов, но также информатика - предмет, включающий материал, который в школах не изучается.
В) Если объем одного понятия полностью содержится в объеме другого, то первое понятие называется подчиненным второму, подчиняющему понятию.
Например, в отношении понятий "Река" и "Волга", подчиняющим будет "Река", а подчиненным - "Волга", как одна из рек.
Г) Соподчиненными называются два понятия, исключающие друг-друга и подчиненные одноми и тому же подчиняющему понятию. Например: "Математика" и "Русский язык" являются соподчиненными понятию ""Школьный предмет".
Длинна символа в кодировке <span>Windows-1251 составляет 1 байт.
В 1kB - 1024B.
Таким образом будет 1536/1024 = 1,5kB </span>
