Написать программу с постусловием, которая будет выводить на экран символ * (х:=*, х:char) до тех пор, пока с клавиатуры не будет введен 0.

Question

Антонида

20 февраля, 19:01

+1

Ответы (1)

Знаете ответ?

Венуша · Answer 1

Var x:char;

begin

read (x) ;

while x0 do

begin

write (x) ;

read (x) ;

end;

end.