program dz2;
var a,b,c,d,f,max:Integer;
begin
Writeln('введи число');
read(a);
b:= a div 1000;
c:= (a div 100) mod 10;
d:= (a div 10) mod 10;
f:= a mod 10;
max:=b;
if b<c then
max:=c;
if c<d then
max:=d;
if d<f then
max:=f;
Write(max);
end.
A = 25
b = 4
a mod b(= 6) (6 не = 4)
идем по блоку 'нет'
a := а mod b
Ответ: 6
Если бы я был организатором производства печенья, то сначала потратил бы дни на приобретение 8 духовок, на это ушло бы 8 * 6 = 48 дней. Потом с помощью 8 духовок и 1 пары рук за 60 дней сделал бы 540 пачек печенья. Итого, 108 дней и 540 пачек, из которых 8 сверхплановых можно кому-нибудь подарить.
Кто быстрее, ребята?
Из книг из интернета от людей.
План решения везде одинаковый, т.к. эти системы однородные. В приложении решение двух - 10.8 и 11.8.
1) строим таблицу истинности для первого уравнения.
2) строим отображения пар друг в друга
3) выводим из отображений рекуррентные формулы
4) создаем расчетную таблицу количества битовых цепочек по рекуррентным формулам
5) в последнем столбце суммируем все полученные битовые цепочки и получаем ответ.