Question

citește x, y, z
dacă y<x atunci
xky
sfârşit dacă
dacă z<x atunci
xkz
sfârşit dacă
scrie x​

Answer 1

program p1;

var x, y, z : integer;

begin

readln(x, y, z);

if y < x then writeln(x*y) else if z < x then writeln(x * z) else writeln(x);

end.