Вычислить у, если у={х^2, х<10 х+а/в, х》10 на языке паскаль

Предыдущий
вопрос Следующий
вопрос

var x, y, a, b: integer;

begin
x := 7; // пример значения x

if x < 10 then
y := x * x
else
y := x + a div b; // предполагается, что a и b уже определены

writeln('y = ', y);
end.