Сделала все до изменения ситуации, подскажите как это сделать? какие новые таблицы нужно создать и с чем их связать? вот : описание предметной области вы работаете в высшем учебном заведении и занимаетесь распределением нагрузки между преподавателями кафедры. в вашем распоряжении имеются сведения о преподавателях кафедры, включающие наряду с анкетными данными информацию об их ученой степени, занимаемой административной должности и стаже работы. преподаватели вашей кафедры должны обеспечить проведение занятий по некоторым предметам. по каждому из них установлено определенное количество часов. в результате распределения нагрузки у вас должна получиться информация следующего рода: «такой-то преподаватель проводит занятия по такому-то предмету с такой-то группой». таблицы преподаватели (код преподавателя, фамилия, имя, отчество, ученая степень, должность, стаж). предметы (код предмета, название, количество часов). нагрузка (код преподавателя, код предмета, номер группы). до этого момента все развитие постановки теперь ситуация изменилась. выяснилось, что все проводимые занятия делятся на лекционные и практические. по каждому виду занятий устанавливается свое количество часов. кроме того, данные о нагрузке нужно хранить несколько лет. внести в структуру таблиц изменения, учитывающие эти факты, и изменить существующие запросы. добавить новые запросы.

👇

Ответ:

Nadezda1997

26.08.2021

У вас уже есть таблица с данными можно создать 2 запроса с справочником где будет взаимодействие с вашей таблицей и не будет такого что в 13:00 преподователь ведет пары в разных классах делаете сперва 1 запрос на лекции где он делит их согласно вашим предпочтениям далее второй запрос практика где так же указываете данные из таблиц и запросов потом немножко корректируете все проверяете и сохраняете запрос и жмете выполнить должно получится что он поделит их согласно установленного расписания вами в определенные дни указанные вами

4,5(12 оценок)

Открыть все ответы

Ответ:

helpmeplease24

26.08.2021

//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
function
Transpose(a: array[,] of integer): array[,] of integer;
//Поворот на 90гр по часовой стрелке
begin
var m := Length(a, 0);
var n := Length(a, 1);
Result := new integer[n, m];
for var i := 0 to n-1 do begin
    for var j := 0 to m-1 do
      Result[i, j] := a[m-1-j, i];
end;
end;

begin
var n := ReadInteger('Введите n:');
//Заполнение матрицы NxN сл. числами и вывод на экран
var a :=MatrixRandom(n, n);
for var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(a[i,j]);
    println;
    end;
     println;

Println('поворот влево на 90 гр');
var b := Transpose(a);
b:=Transpose(b);
b:=Transpose(b);
for var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(b[i,j]);
    println;
    end;
println;

Println('поворот вправо на 90гр');
b := Transpose(a);
for var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(b[i,j]);
    println;
    end;
println;

Println('поворот на 180 гр');
b := Transpose(a);
b := Transpose(b);
for var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(b[i,j]);
    println;
    end;
end.

4,5(86 оценок)

Ответ:

allonso

26.08.2021

1. В "реальном мире" это решается примерно так:

// PascalABC.NET 3.1, сборка 1198 от 11.03.2016
begin
var a:=ArrRandom(ReadInteger('n='),0,2); a.Println;
a.Sorted.Println
end.

Тестовое решение:
n= 15
1 2 0 2 2 0 2 0 2 0 0 1 0 0 2
0 0 0 0 0 0 0 1 1 2 2 2 2 2 2

2. Но, поскольку считается, что школьникам больше заняться нечем, их заставляют писать примерно в таком стиле (и время займет, и ощибок понаделают):

// PascalABC.NET 3.1, сборка 1198 от 11.03.2016
const
nn=100;
var
i,j,n,t:integer;
a:array[1..nn] of integer;
begin
Write('n='); Read(n);
Randomize;
for i:=1 to n do begin
    a[i]:=Random(3);
    Write(a[i],' ')
    end;
Writeln;
for i:=1 to n-1 do
    for j:=1 to n-1 do
      if a[j]>a[j+1] then begin
        t:=a[j]; a[j]:=a[j+1]; a[j+1]:=t
        end;
for i:=1 to n do Write(a[i],' ');
Writeln;
end.

Тестовое решение:
n=15
0 1 1 0 2 1 0 2 1 2 1 0 0 2 0
0 0 0 0 0 0 1 1 1 1 1 2 2 2 2

4,5(50 оценок)

Это интересно:

Хобби-и-рукоделие

01.08.2021

Как найти изображения на компьютере: советы и рекомендации...

Хобби-и-рукоделие

04.09.2020

Как сделать фетровую шляпу: пошаговая инструкция с фото...

22.05.2023

Как убедить родителей не пустить вас в школу: советы для тех, кто хочет изменить свою жизнь...

Компьютеры-и-электроника

10.04.2020