СРОЧНО!!!Решить задачу в Паскале abc (очень важно) условие " В коробке лежат карандаши количество может быть разное, покупатель покупает от 1 до 3 карандашей включительно(нужно сделать так что бы если кто то купил бы к примеру 5 ,то программа бы не работала дальше),необходимо узнать сколько покупателей обслужит продавец перед тем,как они кончатся. срочно!!! через цикл с пред условием "repeat" (until)
Var n, k: longint;BeginK:=0;repeatread (n);If (n <=3) or (n>=1) thenK:=k+1;Until (n <1) or (n> 3);Write (k);End.Если помогло отметьте как лучшее пожалуйста.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
