ввести число ...если оно больше 8 разделить его на 4, если меньше или равно 8 то умножить на пять!

if x>8 then y:=x/4 else y:=x*5

1

Ответы и объяснения

Лучший Ответ!
2012-04-25T21:04:43+04:00

var x,y: real;

begin

  readln(x);

  if x>8 then y:=x/4 else y:=x*5;

  writeln(y);

end.