Question

Вариант 4

S=-1, n=6, X=7, A=19;

начало

Ввод S, n, x,

X<=A

нет

да

S:=Stn

X:=X+3

n:=n-l

Вывод

конец

Answer 1

Ответ:

var s,n,x,a:integer;

begin

 s:=-1;

 x:=7;

 n:=6;

 a:=19;

 if x<=a then

   s:=s+n;

 x:=x+3;

 n:=n-1;

 if x>a then

 writeln(s);

end.