program t3;
var a,b,c:real; {допустимо поменять на integer}
begin
writeln ('Vvedit a,b,c');
readln (a,b,c);
if (a<=b+c) and (b<=a+c) and (c<=a+b) then writeln ('0'); else
if (a=c) and (c=b) then writeln (3); else
if (a=c) or (a=b) or (b=c) then writeln ('2'); else
writeln ('1');
readln
end.
1 минута - 60 секунд
1000:60*36=600 (кб можно передать за 36 секунд при скорости 1000 кб/мин)
1) Трое минимум, так как максимум одновременных уроков физкультуры 3 (второй урок).
2) В 10а перенести второй урок на шестой.
3) 1-Иванов, 2-Петров, 3-Сидоров
<span>Расписание занятий </span>
№ урока
<span> 9а 9б 10а 10б 11а 11б </span>
<span>1)__1__________3______________ </span>
2)__1_____2____3______________
3)____1___3___________________
<span>4)____1___________3___________ </span>
<span>5)________________1___3_______ </span>
6_____________________3_______
4) Номера - преподы.
<span>Расписание занятий </span>
№ урока
<span> 9а 9б 10а 10б 11а 11б </span>
<span>1)__1__________3______________ </span>
2)__1_____2____3______________
3)____1___2___________________
<span>4)____1___________2___________ </span>
<span>5)________________2___3_______ </span>
<span>6_____________________3_______</span>
Var a, b, c, v, s:integer;
begin
read(a, b, c);
writeln('V = ', a*b*c);
writeln('S = ', 2*(a*b+b*c+a*c));
end.
1. A⋀¬B∨A⋀¬C≡A⋀(¬B∨¬C)≡A⋀¬(B⋀C) -- (3 лог. эл.)
2.(A↔B)⋀(B→C)≡(¬A⋀¬B∨A⋀B)⋀(¬B∨C)≡(¬A⋀¬B⋀¬B)∨(¬A⋀¬B⋀C)∨(A⋀B⋀¬B)∨(A⋀B⋀C)≡(¬A⋀¬B)∨(¬A⋀¬B⋀C)∨(A⋀B⋀¬B)∨(A⋀B⋀C)≡(¬A⋀¬B)∨(A⋀B⋀¬B)∨(A⋀B⋀C)≡(¬A⋀¬B)∨0∨(A⋀B⋀C)≡(¬A⋀¬B)∨(A⋀B⋀C)≡¬(A∨B)∨(A⋀B⋀C) -- (5 лог. эл.)
Схемы в прикрепленных.