Var a, b, i: integer; begin a:= s for i := 1 to 10 do begin b:= a-i; if a- b<6 the n a:= b-2* a else a:=2*b-a end; writeln (a); end.

Наш друг, Oleg Woronoff написал новый вопрос в UNC Clinic.

 

Вопрос заключается в том: Var a, b, i: integer; begin a:= s for i := 1 to 10 do begin b:= a-i; if a- b<6 the n a:= b-2* a else a:=2*b-a end; writeln (a); end.

Var a, b, i: integer; begin a:= s for i := 1 to 10 do begin b:= a-i; if a- b<6 the n a:= b-2* a else a:=2*b-a end; writeln (a); end.

  Обсуждение и ответы

Пожалуйста, прочитайте обсуждение и ответы на вопросы Var a, b, i: integer; begin a:= s for i := 1 to 10 do begin b:= a-i; if a- b<6 the n a:= b-2* a else a:=2*b-a end; writeln (a); end. ниже. Оставшиеся без ответа вопросы будут в ближайшее время получить обзор и обсуждение других посетителей.

Вы также можете участвовать ответить или ответить на вопрос "Var a, b, i: integer; begin a:= s for i := 1 to 10 do begin b:= a-i; if a- b<6 the n a:= b-2* a else a:=2*b-a end; writeln (a); end.". Не бойтесь делиться, даже если это все-таки не так. В ClassRU.com, мы учимся друг у друга и обеспечивают обратную связь друг с другом.

Предоставляя ответы или ответы на вопросы Var a, b, i: integer; begin a:= s for i := 1 to 10 do begin b:= a-i; if a- b<6 the n a:= b-2* a else a:=2*b-a end; writeln (a); end., Вы помогли Oleg Woronoff получить ответ ему нужно.