Габа
1)г
2)а
3)б
4)а
вот такой ответ точно правильно
А) K mod 7 = K div 5 -1 ⇒ 15 mod 7 = 15 div 5-1 ⇒ 1 = 3-1 ⇒1=2⇒false
б) odd (trunc(10*P) )⇒odd (trunc(10*0,182) )⇒odd (trunc(1,82) )⇒odd(1)⇒true
в) not odd(n)⇒not odd(0)⇒not false⇒true
г) t and (P mod 3 = 0)⇒true and (10101 mod 3 = 0)⇒true and true⇒true
д) (x*y <> 0) and (y > x)⇒(2*1<>0)and(1>2)⇒true and false⇒false
е) a or not b⇒false or not true⇒false or false⇒false
Только за январь нет оплаты т.к нет предыдущих показаний
var a, b, c , d : integer;
begin
read(a);
b := a mod 10;
c := a div 10 mod 10;
d := a div 100;
if (b mod 2 = 1) and (c mod 2 = 1) and (d mod 2 = 1) then
writeln('Нечетны')
else
writeln('Есть четные');
end.
//прога на Pascal`е
<span>var
</span><span> a : longint;
</span><span>begin
</span><span>write ('Введите кол-во минут: ');
</span><span>read(a);
</span><span>write (a, ' минут{ы) - это ', (a div 60) : 3, ' ч. ', (a mod 60) : 2, ' мин.');
</span><span>end.</span>