Запишите команду цикла с предисловием ( условие : x не равно 0, тело цикла : x уменьшить...

Question

Запишите команду цикла с предисловием ( условие : x не равно 0, тело цикла : x уменьшить на 1)

Answer 1

While x <> 0 do
x:=x-1;