program task;
var
x, f: real;
t: boolean;
begin
readln(x);
t := (x > 2) and (x < 5);
case t of
true: f := 2 * x;
false: f := 0;
end;
write(f);
<span>end.</span>
Ответ: 1) a<17
if (если) условие then (то) действие выполняется, если условие выполняется (истино) else (иначе) действие выполняется, если условие не выполняется (ложно)
426 * 45 * 53 = 1016010
1016010 : 137 = 7416(округлённое число)
7416 минут = 123 часа 36 минут
Ответ: 123 часа 36 минут
var
i, n, y: integer;
begin
write ('x= ');
readln (x);
if (x>0) then
y:=sin(2*x)
else
y:=1-(2*(sin(2*x)));
write(y);
end;