А,б,б,а,б ,а,в легхо и всё
Потому что чтобы уметь пользоваться компьютером нужно как минимум логично рассуждать
1)
var x,s:real;
begin
readln(x);
s:=cos(x) - sin(x) + abs(x-7) + x*x - 1;
writeln (s)
<span>end.
2)
var x,y,s:real;
begin
readln(x,y);
s:=(x+y)/2;
writeln(s)
<span>end.
3)
var x,y:real;
begin
readln(x);
if x<0 then y:=x*x-5;
if x=0 then y:=3;
if x>0 then y:=x-3;
writeln(y)
<span>end.</span></span></span>
162 mb/3*60sec = x/360
162/3/60= 0,9
360 * 0,9 = 400
Как то так