Cоставить блок схему для решения задачи. Дано число Х. Увеличить его на 5 если оно положительно,а в противном случае вывести отрицательное число

var a.x:integer;write(введите ваше число);readln(x)if(x>0)then begina:=x+5;writeln('Увеличенное число =',а );endelse writeln('Число x =',x)end.