Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.83/18: Рейтинг темы: голосов - 18, средняя оценка - 4.83
0 / 0 / 0
Регистрация: 10.08.2013
Сообщений: 49

После ввода в turbo pascal данного кода и нажатия сtrl+F9 ничего не происходит...

10.08.2013, 20:39. Показов 3736. Ответов 20
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем привет. Начал недавно изучать turbo pascal и сразу возникли проблемы. Нашёл в книге простенькую программу по выводу текста на экран, вот код:
Pascal
1
2
3
4
5
6
Program My_Eirst_Progtam; 
const 
Text = 'Я программирую на Турбо Паскале'; 
begin 
WriteLn(Text); 
end.
После ввода в turbo pascal данного кода и нажатия сtrl+F9 ничего не происходит... В чём может быть проблема? Может нудна какая-то специальная ОС? Может проблема в самом паскале? В общем, помогите плиз!
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
10.08.2013, 20:39
Ответы с готовыми решениями:

В Turbo Pascal при нажатии на Run ничего не происходит, а в Free Pascal окно сразу же закрывается
Привет всем! У меня такая небольшая проблемка... Я установил Turbo Pascal и Free Pascal. Попробовал по самоучителю написать обычные...

После нажатия кнопки ничего не происходит
Всем доброго дня! Подскажите, пожалуйста, в чем проблема данного кода. После нажатия на кнопку отправить ничего не происходит (от слова...

Почему после нажатия на кнопку ничего не происходит?
1) почему после нажатия на кнопку ничего не происходит, и почему она сразу не отображается 2) как избавиться от мерцания во время...

20
481 / 119 / 17
Регистрация: 30.09.2010
Сообщений: 473
20.08.2013, 23:08
Студворк — интернет-сервис помощи студентам
Ну да, не совсем корректно высказался - конечно, text является определенным в модуле system типом.

Переопределить его можно, но тут я так и высказался - что использовать нежелательно, а невозможно. В Турбо Паскале вообще много чего можно переопределить, чего переопределять по уму не надо бы. Можно, например, записать даже такое:
Pascal
1
2
var
  break, continue, sizeof: integer;
и если в программе не будут использоваться эти операторы, то все будет вроде нормально. Но делать так крайне нежелательно.

Цитата Сообщение от UI Посмотреть сообщение
Тип этот по прежнему можно использовать, хотя бы и вот так:
Pascal
1
var f : System.Text;
, если понадобится.
Можно написать еще красивее, введя синоним:
Pascal
1
2
3
4
5
6
7
type
  textfile = system.text;
 
var
  text: string;
 
  f: textfile;
Но и так делать нежелательно - код по возможности должен читаться однозначно, вводимые в программе собственные описания и определения не должны без крайней необходимости переопределять описания и определения, сделанные в стандартных модулях и популярных используемых библиотеках. Иначе в достаточно сложной программе черт ногу сломи - в программировании есть достаточно естественных сложностей, не надо городить еще и искусственные.

Цитата Сообщение от UI Посмотреть сообщение
А уж если в программе не используются текстовые файлы - то и вообще говорить не о чем. Ничего крамольного в приведенной программе нет.
Ага, значит если не используется, пишем в одном стиле, а если используется - то в другом. Сразу видно схоласта, не писавшего ничего длиннее 150 строчек.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
20.08.2013, 23:08

После ввода строки ничего не происходит, а программа закрывается
uses crt; Var i,p:integer; s:string; Begin write('Vvedite stroky: '); readln(s); p:=0; For i:=1 to Length(s)...

После написания кода для кнопки не происходит ничего, ни ошибок, ни прописанных действий
Не понимаю что не так с формой, та часть кода что работает на других формах на данной не приводит ни к чему. Такое происходит не со всеми...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
21
Ответ Создать тему
Новые блоги и статьи
Был там один разговор по поводу свободы в материальном мире.
kumehtar 19.08.2026
Суть: рассматривается живое существо, оказавшееся внутри довольно странной системы (этого мира) и пытающееся обустроить в ней свой кусок пространства. Жизнь действительно предъявляет каждому. . .
Когда логика программы не спасает от человеческих ошибок
Maks 18.08.2026
В последнее время всё чаще и чаще сталкиваюсь с таким явлением, как абсолютная невнимательность (или глупость) пользователей. Проявляется это чаще всего на работе в коллективе. Допустим, человек с. . .
Лето уходит
kumehtar 17.08.2026
Мысли в слух
kumehtar 17.08.2026
Забавно, насколько сейчас стала доступна информация. Например о магии, духовном развитии, медитациях, и других подобных направлениях, ранее зачастую тайных, передаваемых от учителя к ученику. Хотя. . .
Перемещение строк из ТЧ в другой документ с учетом текущего пробега
Maks 17.08.2026
Реализация из решения ниже выполнена на примере нетипового документа "Автозапчасти", с ТЧ "Шины". За основу взят алгоритм отсюда: https:/ / www. cyberforum. ru/ blogs/ 359708/ 10838. html Задача: . . .
Саморегулирующийся социальный контракт для сервера cross-section.
Hrethgir 14.08.2026
С кодом конечно таких глубоких размышлений пока не было, впрочем я уже привык к алгоритмизации. Суть предмета записи: снова в диалоге с нейросетью (я взял пока себе ник для учётки админа - Rector). . . .
Часы электронные
Uhbif79 12.08.2026
Выкладываю программу часов. Программа позволяет: 1. Использовать системное время и дату, 2. Есть возможность вводить время и дату вручную. 3. Реализованы 2 будильника: начало и конец рабочего дня. . . .
Часы с будильником на основе класса QLCDNumber
Uhbif79 12.08.2026
Всем добрый день, выкладываю программу часов с будильником на основе класса QLCDNumber. Здесь я пробовал самостоятельно создавал классы, впервые столкнулся с видимостью переменной одного класса из. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru