Составить алгоритм блок схему и программу для решения задачи ввести число если оно положительное разделить на 4 если отрицательное или равно нулю умножить на 5

Ох, ну блок-схема вот: в ромбе: n>0, далее + и в прямоугольнике n: = div 4, или n<=0, в прямоугольнике n:=n*5, далее конец

var

n:integer;

read (n);

write ('напишите n');

begin

if n>0 then

n:=n div 4

else

n:=n*5;

read (n);

end;

end.

Могла с составлением программы ошибиться.