Составить программу (Паскаль). Ввести число. Если оно больше 45, разделить его на 2, если меньше или равно 10, то умножить на 5.​

program qq;

var

  n : integer;

begin

  readln(n); //Вводим число

  if n > 45 then //Если оно больше 45 то

     writeln((n / 2):0:3); //Выводим число делённое на 2

  if n <= 45 then //Если меньше или равно

     writeln(n * 5); //Выводим n * 5;

end.

Писал на fpc