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

Var x:char;
begin
read(x);
while x<>0 do
begin
write(x);
read(x);
end;
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.