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

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

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.