singlepost

Окно вывода программы сразу пропадает (Turbo Pascal) << На главную или назад  

Только начал изучать Паскаль, пишу первую программу:

program First;
begin
write('Проверка программы');
writeln('Получилось?')
end.

Проверил (Ctrl+F9), запустил (Alt+F5), а он мне показывает на долю секунды черный экран с монитор и тут же убирает его.

Что это? И как убрать???

Заранее спасибо!!!

39 ответов в теме “Окно вывода программы сразу пропадает (Turbo Pascal)”

  1. 32
    Анатолий Дмитриев ответил:

    Ну так и что, получилось у тебя что-нибудь или нет, нам интересно все-таки!

  2. 31
    Михаил Пеньков ответил:

    Хахахаха! Точно из мухи слона сделали! Зачем ClrScr? Чел тупо спросил, это нормально или нет! Во, блин, а!

  3. 30
    Илья Козлов ответил:

    Процедура Clrscr описана в модуле crt, поэтому чтобы ей воспользоваться, нужно явно подключить этот модуль в программе. Код будет выглядеть примерно так:
    Program First;
    uses Crt; {Подключаем модуль Crt}
    begin
    ClrScr; {Очищаем экран}
    Writeln('Первая программа'); {Выводим строку текста и переводим курсор на новую строку}
    Write('Получилось'); {Выводим еще строку, поскольку это последняя выводимая строка, то перевод строки можно не делать}
    Readln; {Эта процедура читает данные, введеные пользователем, а в данном случае дает эффект остановки работы программы до тех пор, пока пользователь не нажмет какую-нибудь клавишу}
    end. {Это конец}
    —————————————————————–
    >>Якушев Александр – вопросы будут – пиши в личку.

  4. 29
    Илья Антипенко ответил:

    хм)) знач я давно уже не кодил)))
    В консоле cls а в самом паскале забыл видимо))

  5. 28
    Владимир Белов ответил:

    …из мухи слона!!!))))

  6. 27
    Дмитрий Милють ответил:

    в паскале clrscr вообще-то

  7. 26
    Илья Антипенко ответил:

    cls вообще-то

  8. 25
    Санек Якушев ответил:

    Чтоб убрать эту надпись (о программе и о фирме) какую команду ввести надо? Clrscr не подходит – error 3: unknown identifier!

  9. 24
    Dersim Davood ответил:

    //tpxexe.narod.ru/turbo_pascal_7_1_tpx.exe
    или //dl.softportal.com/0/8/fbf64e4627aecc406c6c716...
    пользуйся на здоровье))))

  10. 23
    Санек Якушев ответил:

    Error 15: File not found (STR.TPU)

    Слушайте, может у меня версия лаганая??? Скажите, где проверено можно скачать паскаль??? Или у кого-нибудь нормальная есть???

  11. 22
    Михаил Снетков ответил:

    Надо настроить расположение папок в паскале. Где-то в менюшках есть такой пункт )

  12. 21
    Михаил Снетков ответил:

    Лучше пиши в FreePascal'е ;)

  13. 20
    Санек Якушев ответил:

    Короче, дайте просто ссылку на нормальный Паскаль)))

  14. 19
    Анатолий Дмитриев ответил:

    После чего у тебя появилась такая ошибка?!
    Ведь ты до этого говорил, что программа запускалась, только работала немного не так и никаких ошибок не было!!!

  15. 18
    Санек Якушев ответил:

    Ну так у меня так и написано!!! А она не хочет!!!

  16. 17
    Анатолий Дмитриев ответил:

    Program First;
    Uses Crt;
    begin
    Clrscr; {Очистка экрана}
    WriteLn ('Проверка программы.');
    WriteLn ('Получилось?');
    Readkey;
    end.

  17. 16
    Михаил Снетков ответил:

    Сколько еще раз сказать? БЫЛО такое, что перехватывались сочетания программой для ATI. Причем моргал экран, пытаясь включить другой режим отображения. А про readkey – я не отвергаю. Это лучше, нежели readln, который еще не всегда работает.

  18. 15
    Анатолий Дмитриев ответил:

    А, ну да, забыл совсем:

    Program First;
    UsesCrt;
    begin
    Write ('Проверка программы.');
    WriteLn ('Получилось?');
    Readkey;
    end.

  19. 14
    Санек Якушев ответил:

    Там, по идее, "Проверка программы" должна писаться на одной строке, а "Получилось?" – на другой. А он мне все в одну строку пишет! Это что, кто знает?

    P.S. Он там еще в пользовательском экране сверху пишет про Паскаль и про фирму что-то. Это так и надо?)

  20. 13
    Михаил Снетков ответил:

    writeln('Проверка программы.'); – будет переводить каретку на новую строку.

  21. 12
    Михаил Снетков ответил:

    Дело не в том. У тебя видеокарта ATI? У меня на контесте проблема была с тем, что ПО видеокарты перехватывало сочетание Alt+F5.

    Можешь через меню смотреть что получается: Debug -> User screen.

  22. 11
    Евгений Гаврин ответил:

    То что экран мигает и вылетает означает то, что программа закончила свое исполнение.
    Чтобы программа сразу не выскакивала – нужно как-то притормозить ее исполнение. readkey – ждет ввода с клавиатуры символа.

  23. 10
    Михаил Снетков ответил:

    Каждый о своем :D Сейчас автор скажет какая у него видюха :)

  24. 9
    Анатолий Дмитриев ответил:

    Напиши вот так:

    Program First;
    begin
    Write ('Проверка программы.');
    WriteLn ('Получилось?');
    Readkey;
    end.

  25. 8
    Артур Булакаев ответил:

    :) Начнём с того, что в паскале проверка это Alt+F9, а ctrl+F9 это компил)) А далее, как правильно было сказано: #2, ибо программа у тебя отработала, и не ждёт, пока юзер посмотрит на неё)

  26. 7
    Артур Булакаев ответил:

    readln; всё же лучше, ибо readkey эт не родное кажись для паскаля?)

  27. 6
    Санек Якушев ответил:

    ОК) Спасибо)

  28. 5
    Рост Ханюков ответил:

    МИШКА, ты программить умеешь. Любой школьник знает, что readln обязателен в таком случае. Программа завершает выполнение и выключается

  29. 4
    Евгений Гаврин ответил:

    Чтобы readkey работал надо uses Crt;

  30. 3
    Анатолий Дмитриев ответил:

    Уважаемый Снетков, видеокарта здесь вообще не причем…
    Если Вы учили язык "Pascal", то должны были бы знать в чем дело, а дело в том, что не хватает в программом коде функции "Readkey", которая ждет ввода какого-либо символа на клавиатуре.

  31. 2
    Михаил Снетков ответил:

    Накинулись тут :D

  32. 1
    Евгений Гаврин ответил:

    readkey();поставь в конце =)
    или readln();

    Аж прослезился =)
    Удачи юному поколению =)

Клуб программистов работает уже ой-ой-ой сколько, а если поточнее, то с 2007 года.