Question

Составьте программу по блок-схеме. Пожалуйста.​

Answer 1

program n1;

var x: Integer;

begin

writeln("Введите x:");

readln(x);

x:= x-5;

if x>10 then x:= (2*x)-10;

writeln(x);

end.