Question

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

Answer 1

var x:real;
begin
readln(x);
if(x>8) then x:= x/4
else x:=x*5;
writeln(x);
end.