ДАЮ МНОГО БАЛЛОВ! 9 класс. Помогите пожалуйста! Нужно блок-схемы (на фото) преобразо

1)var x:=0;   var y:= 0;   var r:= 0;   var q:= 0;begin  writeln(x);  writeln(y);  r:= x;  q:= 0;  while(r>=y)do  begin    r:= r-y;    q:= q+1;  end;  writeln(r);  writeln(q);end.