freepascal

0열

2답변

FreePascal : 비 라틴계 Windows에서 GetEnvironmentVariable을 사용하는 방법?

저는 Lazarus 1.6.4와 FPC 3.0.2를 사용하여 Windows에서 USERNAME과 Linux에서 USER를 얻는 코드를 작성했습니다. 이를 위해 SysUtils.GetEnvironmentVariable 함수를 사용했습니다. 리눅스에서는 완벽하게 작동하지만 Windows에서는 잘못된 인코딩으로 열리는 UTF8 문자열처럼 보이는 손상된 것을 반환

1열

1답변

fpc 디버깅 출력에 줄 번호를 생성 할 수 없습니다.

아래와 같이 매우 간단한 테스트 프로그램 (test.pas)이 있는데 메모리 추적을 생성하려고하지만 줄 번호가 포함 된 자세한 출력을 얻을 수 없습니다. program test; var intPointer:^integer; begin new(intPointer); //Allocate some memory intPointer

-1열

1답변

파스칼 변종 레코드의 사용

파스칼을 잘 아는 사람들로부터 도움이 필요합니다. 변형 레코드를 사용하려면 (선생님 요구 사항) 필요합니다. 그 변형 기록은 다음과 같이 정의된다 :이 주제에 대한 내 연구에서 발견 된 주요 자료에 따르면 Temperature = record case scale : TemperatureScale of celsius : (celsius_va

1열

1답변

Delphi의 FreePascal PACKRECORDS 지시문

Delphi Tokyo (32 비트 Windows VCL 응용 프로그램)의 this answer 하단 링크에서 FreePascal 2.2.2 ibase60.inc을 사용하려고합니다. 지시문 {$PACKRECORDS C}이 포함되어 있습니다. documentation는 다음과 같이 말합니다 : 특수 값 C는 GNU CC 컴파일러와 같은 정렬을 지정하는 데 사

0열

1답변

배열 범위 오류 (파스칼)

나는 수업을 위해 파스칼에서 숙제를하고 있는데, 나는 걸림돌을 때렸다. 기본적으로 작동하지만 숙제 제출 사이트에서 저에게 완전한 신용을 부여하지 않았습니다. 나는 교수님에게 이메일을 보내고 그는 {$ r +} 지시어로 나를 감추었습니다. 이를 포함 시키면 런타임 오류 201이 발생합니다. 문제가 범위 검사와 관련이 있다는 것을 알고 있지만 어떤 변경으로 문

0열

1답변

무료 파스칼 컴파일러 - 치명적 : 구문 오류, "OF"가 예상되었지만 "["이 (가) 발견되었습니다 ...?

가 나는 Player가 사용자 정의 record.Here입니다이 절차를 정의하는 절차입니다 : procedure print_scores(players : array[1..2] of Player); begin writeln; writeln(' Player 1 (', players[1].player_name.firstname, ' ',pla

0열

1답변

O (sqrt (n))에 완벽한 수표 최적화

프로그램의 일부 입력 번호가 완벽한 숫자인지 확인합니다. 우리는 O (sqrt (n))로 실행되는 솔루션을 찾아야합니다. 내 프로그램의 나머지 부분은 일정한 시간에 실행되지만,이 기능을 사용하면 문제가 해결됩니다. function Perfect(x: integer): boolean; var i: integer; sum: integer=0

-2열

2답변

Lazarus 링크가 Linux Mint 18.3에서 실패했습니다. 계피

저는 Linux Mint, Lazarus 및 fpc를 처음 사용합니다. 계피와 라자루 v1.8.0을 설치했는데 fpc와 fpc-src가 필요하고 fpc 3.0.4와 fpc-src 3.0.4가 설치되어 문제없이 Lazarus가 시작되었고 가장 간단한 실행을 시도했습니다. 빈 양식 만있는 응용 프로그램입니다. "sudo apt-get install xxx"명령

-2열

1답변

TurboPascal7에서 0으로 나누기

나는 학교 프로젝트를 진행하고 있으며이 문제에 대해 (거의) 분노하고 있습니다. 내 솔루션의 유효성은 95 %이지만 잘못된 입력이 1 개 있습니다. 입력을 알 수는 없지만 0으로 나누는 오류 코드 200 때문에 입력이 실패했습니다. 내 프로젝트는 다음과 같습니다. 이 : "정수의 숫자 합은 정수로 쓰여진 형식의 숫자 합계로 정의됩니다. 대개 우리는 숫자의

-1열

2답변

파스칼, 서수 오류

10 억 회 동안 루프를 실행하고 실행하지 못하게하려면이 작업을 도와주세요. 서수 오류가 발생했습니다. program kittu; var i:qword; j:qword; k:qword; begin i:= 10000000000; k:= 0; for j:=1 to i do begin