a:=(6+2)*4 = 8*4 = 32
b:=a mod 5+1 = 32 mod 5+1 = 2+1 = 3
a:=b div 6-2 = 3 div 6-2 = 0-2 = -2
Ответ: a = -2 ; b = 3.
Var
l,k,j,t,n1,m,p,s,n:longint;
begin
read(n);
l:=n div 60;
k:=n mod 60;
if k>34 then
l:=l+1
else
begin
j:=k div 10;
t:=k mod 10;
if t=9 then
j:=j+1
else
n1:=t;
end;
writeln(n1,' ',j,' ',l);
<span>end.</span>
Вкусовая - Вкус
Обонятельная - Запах
Осязательная - Осязания