Народ, нужна небольшая пoмощь, а точнее разъяснение. Есть программа меню. Нужно, чтобы при выборе пунктов меню выполнялись некоторые программы. То есть, я копирую программу меню, запускаю выполнение программы. Появляется меню: «Данные», «Справка», «Выход». При выборе например «Справка» должна выполнятся какая-то программа.
Как эту подпрограмму вставить в это меню? Вот программа меню:
Uses CRT,DOS; Var SPISOK:array[1..3] of string[7]; kod,kod1 : char; n,i,p : byte; Procedure CURS(size:word); Var Regs : Registers; begin With Regs do begin AH:=$01; CH:=Hi(size); CL:=Lo(size); Intr($10,Regs) end end; Procedure findd(n:byte); begin Textmode(3); Window(1,1,80,25); TextBackGround(Black); ClrScr; case n of 1: begin end; 2: begin end; 3: exit end; readln; Curs($0607) end; Procedure oformenu; begin p:=1; i:=1; Repeat if i=n then begin TextBackGround(Blue); Textcolor(LightGray); end else begin TextBackGround(Lightgray); Textcolor(Blue); end; gotoxy(1,i); writeln(SPISOK[i]); inc(i); inc(p) until p>3; kod:=ReadKey; CASE kod of #13: begin < обработка клавиши Ввод>findd(n); exit end; #0: begin kod1:=ReadKey; case kod1 of #72: if n>1 then dec(n) else n:=3; #80: if n end else oformenu end; end; BEGIN SPISOK[1]:=’Данные ‘; SPISOK[2]:=’Справка’; SPISOK[3]:=’ Выход ‘; TextBackGround(Black); Textcolor(Lightgray); ClrScr; Window(35,10,43,13); n:=1; Curs($2000); oformenu; END.
Источник: studassistent.ru
Как установить Pascal для подготовки к ЕГЭ по Информатике? Тёмная тема в Паскале.
Как вставить программу в паскаль
Пользователь
: 31
Как копировать код программы из текстового документа в паскаль?
: 2,740
Редактор NotePad++, вероятно и другие есть.
Пользователь
: 31
а можно по подробнее. что с ним сделать нужно?
Форумчанин
: 192
Открываешь файл *.pas, и копруешь код программы. Затем сохраняешь документ с кодровкой: (OEM — русская).
Последний раз редактировалось pomoshnic; 23.12.2008 в 23:53 .
Форумчанин
: 500
Открыть *.pas файл с помощью блокнота, или изменить у *.txt расширение на *.pas.
Skype : UASm1Le.
| Похожие темы | ||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| Как копировать папку с подпапками и файлами | tarakan1983 | Помощь студентам | 6 | 16.10.2008 03:16 |
| как переписать код программы с книги, потом сохранить и скомпилировать? | Graff_1 | Помощь студентам | 3 | 14.05.2008 16:21 |
| код для текстового редактора | Михаил Юрьевич | Общие вопросы Delphi | 9 | 08.03.2008 20:11 |
| Как копировать и одновременно переименовывать файлы? | eriser | Помощь студентам | 4 | 17.01.2008 17:51 |
Установка Turbo Pascal на ОС Win7 64-bit. Основы программирования. Паскаль. Урок №1.
Источник: www.programmersforum.ru
2.2. Ввод программы в среде Turbo Pascal
Ввод и редактирование программы в окне среды Turbo Pascal производятся так же, как и в любом другом текстовом редакторе. Например, введите следующую программу: program Primer1; var A,B,C:Integer; begin Write(‘A=’); Read(A); Write(‘B=’); Read(B); D:=A+B; WnteLn(‘C=’,C) end.
2.3.Сохранение программы в файле
Для сохранения подготовленной программы в виде файла необходимо нажать клавишу F2 . Если вы создаете новый файл, то среда Turbo Pascal запросит имя файла: на экране появится ок- но (см. рис. 2.8) диалога Save File As ( Сохранить файл под име- нем. ), и курсор будет помещен в строку ввода.
Рис. 2.8 Необходимо набрать имя файла и нажать Enter . Расширение.pas можно не указывать, оно приписывается к имени автоматически. Сохраните программу в файле primer1.pas , выполнив действия: — нажмите F2 ; — в строке ввода наберите имя файла primer1.pas ; — нажмите Enter .
2.4. Работа с существующей программой
Если ваша программа подготовлена ранее с помощью како- го-либо текстового редактора и хранится в виде файла в каталоге (например, файл primer1.pas в каталоге E:STUDENTS), то его можно загрузить в окно редактирования среды Turbo Pascal нажатием клавиши F3 либо с помощью последовательности действий: — нажать клавишу F10 ; происходит выход в меню; — выбрать пункт File и нажать Enter ; — с помощью «стрелок» выбрать пункт Open и нажать Enter ; — появляется окно диалога, в котором выбирается нужный файл. ЗАМЕЧАНИЕ! В случае, когда программа хранится на дискете, необходимо первоначально переписать соответствующий файл на жесткий диск в ваш рабочий каталог.
2.5. Компиляция программы в среде Turbo Pascal
Компиляция — это процесс перевода программы на язык машинных команд. Прежде чем программа на Паскале будет выполнена, ее необходимо откомпилировать. В результате компиляции Turbo Pascal создает исполняемый файл с тем же именем, что и файл, содержащий программу, но с расширением.ехе. Впоследствии этот файл может быть выполнен, как любой другой исполняемый файл.
Turbo Pascal выполняет компиляцию программы по нажатию клавиши F9 . При этом в центре экрана появляется окно (см. рис. 2.9), отображающее информацию о ходе компиляции. Рис.
2.9 Если в процессе компиляции в программе обнаружена синтаксическая ошибка, то компиляция прерывается, на экране появляется строка, содержащая информацию об ошибке, а курсор устанавливается в том месте программы, в котором обнаружена ошибка. Вы должны исправить ошибку и вновь попытаться -от компилировать программу, нажав клавишу F9 . Если в программе нет ошибок, то в нижней части окна(см. рис. 2.9) появляется надпись: Compile successful: Press any key. (Успешная компиляция: Нажмите любую клавишу. ) После этого ваша программа может быть выполнена. Откомпилируйте программу primer1.pas , выполнив дейст- вия: — нажмите клавишу F9 ; в процессе компиляции Turbo Pascal обнаружит ошибку; курсор будет установлен под симво-
лом’D’в строке D:=A+B, а на экране, в верхней строке окна редактирования появится сообщение» Error 3: Unknown identifier » ( Ошибка 3: Неизвестный идентифи- катор ); это объясняется тем, что в строке D:=A+B использована переменная D, которая не объявлена в разделе описания var; — исправьте’D’на’С’(сообщение об ошибке исчезает с экрана) и нажмите клавишу F9 . Больше ошибок нет, компиляция завершается успешно; — нажмите любую клавишу; окно компиляции исчезнет с экрана. Сохраните изменения, сделанные в программе нажатием клавиши F2 .
2.6. Выполнение программы в среде Turbo Pascal
Среда Turbo Pascal предоставляет возможность выполнить программу, расположенную в текущем окне редактирования, не выходя из среды. Для этого требуется нажать комбинацию клавиш Ctrl+F9 . Если в программу были внесены изменения, то сначала будет осуществлена ее компиляция, а затем запуск на выполнение. По окончании работы программы происходит возврат в среду Turbo Pascal.
При этом результаты ее выполнения исчезают с экрана. Для того чтобы просмотреть их, следует нажать клавиши Alt+F5 . На экране восстанавливается то изображение, которое было в момент завершения выполнения программы. После просмотра результатов дня возврата в средуTurbo Pascal можно нажать любую клавишу.
2.7. Выход из среды Turbo Pascal
Для выхода из средыTurbo Pascal требуется нажать комбинацию Alt+X либо выполнить команду Exit из меню File . Если изменения в программе не были сохранены, Turbo Pascal выдаст окно с предупреждающим сообщением (рис. 2.10).
Источник: studfile.net