Question

напишите оператор цикла while, который будет выполняться бесконечно

Answer 1

i:=0;

while i <> 0 do

(переменную i больше не трогать!!!)

Answer 2

Напиши всю программу, пожалуйста

Answer 3

Чтобы написать программу, нужно знать что она должна делать... )))