Я использую очень старую версию Turbo Pascal, и для компиляции используется turboh.com . Что особенного в этом *.com (насколько я могу судить), так это то, что он будет компилироваться на очень старом компьютере, который у нас есть, но мы не можем...

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

Можно ли установить фон консоли в Паскале на чисто белый? меня не устраивает TextBackground(White); Я могу использовать функции WinApi, если это что-то изменит. Я знаю, что фон в консоли можно сделать чисто белым (не серым). Я когда-то...

Мне нужно написать процедуру метода Эйлера для дифференциальных уравнений на Паскале. У меня есть это: program Euler_proc; {$mode objfpc}{$H+} uses {$IFDEF UNIX}{$IFDEF UseCThreads} cthreads, {$ENDIF}{$ENDIF} Classes { you can add...

Итак, я столкнулся с этой задачей. Я написал код, но почему-то вместо того, чтобы помещать содержимое файла в другой файл2, он просто стирает содержимое файла2. Что я делаю не так? Program Lesson9_Program2; Var FName, Fname2, Txt, Txt2 :...

Когда я пишу во внешний файл на Паскале, внешний файл не записывается полностью, хотя кодирование было безупречным. procedure save; {Menyimpan data penerbangan ke dalam file eksternal} begin write('> '); write('nama file:...

У меня есть устаревшая программа TP5. Он компилируется и работает нормально, используя TP7. Я хотел бы зафиксировать и зарегистрировать некоторые операторы write/writeln. Я могу выполнить глобальный поиск и замену для записи и записи, поэтому я не...

Пишу программу на Паскале. И есть некоторые проблемы с условиями. Например, если вы напишите во вводе 1 1 1 4 5 1 2 2 tArea1 = 6 и sumAreas = 6 тоже Но в структуре if это работает некорректно. Помоги мне, пожалуйста. Tnx....

В программе ниже, где WinTypes , WinProcs и какова цель SW_NORMAL ? program ex; uses Wincrt,WinTypes, WinProcs; var ch:string; procedure exe (che:string); begin writeln('ecrire ch'); readln(che); if ch ='oui' then begin...