. Колледж Минимальный список характеристик:
• Номер, ФИО, адрес и должность преподавателя, ученая степень (при наличии);
• код, название, количество часов, тип контроля и раздел предмета (дисциплины);
• код, название, номер заведующего отделением;
• номер аудитории, где преподаватель читает свой предмет, дата, время, группа. Один преподаватель может вести несколько дисциплин и одна дисциплина может вестись несколькими преподавателями.
Примечание: Циклы дисциплин: гуманитарный, общеинженерный, математический, компьютерный и т.д.
Выборки:
• Выбрать преподавателя, который был "без работы" весной 2015 г.
• Определить возможные "накладки" аудиторий в расписании.
• Вывести расписание занятий своей группы на март 2020 г. • Определить для каждой группы долю дисциплин каждого цикла в процентах.
i,k,N : Integer;
Begin
For i:=0 to 6 do m[i]:=0;
Readln(N);
k:=6;
While N>0 do
Begin
If N>=Power(2,k) then
Begin
N:=N-Trunc(Power(2,k));
Inc(m[k]);
end else Dec(k);
end;
For i:=0 to 6 do Writeln(Power(2,i),' ',m[i],' шт.');
end.
Еще вариант:
Const
NN = 7;
money : array[1..7] of Integer = (1,2,4,8,16,32,64);
Var m : array[1..NN] of Integer;
i,k,N : Integer;
Begin
For i:=1 to NN do m[i]:=0;
Readln(N);
k:=NN;
While N>0 do
Begin
If N>=money[k] then
Begin
N:=N-money[k];
Inc(m[k]);
end else Dec(k);
end;
For i:=1 to NN do Writeln(money[i],' ',m[i],' шт.');
end.
Двигаемся в обратном порядке 2324142 (идём с конца) ей противоположные 1323141
2 задание) ответ: 2949;
мы должны получить 11 и 13 причем минимально . можем только так 9+2 и 9+4 . значит 2949
3 задание) ответ: 3;
чтобы добраться до 21 нам нужно выполнить 1 команду 6 раз и 3 раза вторую , нас спрашивают про вторую пишем ответ 3
4 задание) ответ: 1;
нам нужно число которое делится на 5 то есть 4 отпадает , и также нам нужно чтобы модуль разности был не более 2 и во втором и в третьем модуль разности больше 2 , остается 1.
5 задание) ответ: 1112221;
Я всегда начинаю с обратного
57-56-28-14-7-6-5-4 собираем с конца 1112221