Учеба и наука

Решено

Помогите написать программу на паскале - вопрос №858603

как вывести введенный текст удалив из него все цифры? это тоже последовательность, выполняется до тех пор пока пользователь не введет точку. Написать тоже на паскале без массивов.

декабрь 3, 2013 г.

  • Всего ответов: 1

  • Валентина - аватарка

    Валентина

    3-й в

    program pr;
    uses crt;
    var ch:char;
    begin clrscr;
    writeln('вводите текст, окончание — точка');
    repeat
    ch:=readkey;
    if not(ch in ['0','1','2','3','4','5','6','7','8','9'])
    then write(ch);
    until ch='.';
    end.

    Буду благодарна, если отметите 

    декабрь 3, 2013 г.
    Ответ понравился автору
    Лучший ответ по мнению автора

Похожие вопросы

Может ли шар радиуса R...

июнь 11, 2013 г.

Учеба и наука