Как работать в pascal n ide

Обновлено: 05.07.2024

Pascal N-IDE
версия: 4.3.2

Последнее обновление программы в шапке: 18.03.2018

Прикрепленное изображение

Прикрепленное изображение

Прикрепленное изображение

Прикрепленное изображение

Прикрепленное изображение

Краткое описание:
Pascal IDE на Android

Приложение является портом среды программирования Pascal для платформы Android. Оно даёт возможность обучаться и практиковаться без компьютера, что позволяет заниматься созданием программ абсолютно в любом месте.

Сейчас приложение активно развивается и переодически дополняется недостающими параметрами, функциями, типами данных и т.д. Стоит подчеркнуть, что это порт, а потому весь функционал настольного Pascal не будет перенесён, т.к. некоторые функции не несут серьёзного значения (type cursor, for..in loop, with..do .. statement, . ).

  • Compile Pascal programs and run them without Internet.
  • Error when compiling
  • Powerful editor with many smart features:
    1. File menu: create a new program file, open, save, automatically save file
    2. Menu edit: Undo, redo, copy, paste
    3. Auto suggest: Display a small popup window that suggests words that coincide with the word being typed
    4. Auto format: automatically reformat the code for easier viewing
    5. Find / Find and replace: Regular Expression support
    6. Goto line: Move the cursor to a line
    7. Highlight code: highlight the keywords
    8. Code style: many interface for the editor
    9. Font size, font, word wrap
  • Ctrl-C, Ctrl-V, Ctrl-X for Copy, Paste and Cut
  • Ctrl-S, Ctrl-O for File Save / Open
  • Ctrl-B to compile, check for errors
  • Ctrl-R to run the program
  • Ctrl-D to duplicate the current line
  • Ctrl-Z, Ctrl-Y for Undo / Redo
  • Ctrl-L for "go to line"
  • Ctrl-F to Find
  • Ctrl-A to select all
  • Pointers
  • Exceptions
  • Set, and Variant types
  • for . in . do loops
  • with . do statements
  • goto, label (it will never supported)

  • The "aTTSpeech" library converts text to speech. See example text_to_speech.pas
  • The "aRecognition" library converts speech to text (requires Google Voice). See example speech_to_text.pas.
  • The "aVibrate" library supports vibration control. You see example vibrate.pas
  • The "aSensor" library supports processing of Android sensors (light, acceleration, . ). See accelerometer_sensor.pas for accelerometer sensor example
  • The "aNotify" library helps display notifications in the status bar. See the example notify.pas
  • The "aClipboard" library works with the clipboard in Android. See the clipboard.pas example
  • The "aBattery" library retrieves the battery information of the device. See battery.pas example

Если в приложении, Вы нашли какие-то несоответствия с переводом или формулировкой, то просьба писать в этой теме с приложением скриншота и варианта исправления.Отблагодарить, естественно, не забуду ;)

Русский интерфейс: Да

Версия 3.5.3: (без русского языка - косяк разраба) Pascal N-IDE_3.5.3.apk ( 2.36 МБ )

nikita 13, на русский перевёл бы было бы ништяк :)

procedure nach; forward;

procedure ending;
begin
sound(400);
delay(800);
NoSound;
setcolor(liter_color);
OutTextXY(100, 10, 'Игра окончена! Число очков: ' + spoints);
OutTextXY(100, 24, 'Сыграть ещё? (Y / N)');
readln(kl);
closegraph;
if kl = 'Y' then nach
else halt;
end;

procedure krug(a, b: integer; c: shortint);
begin
setcolor(c);
circle(a, b, k);
end;

procedure scanner;
var
t: integer;
begin
for t := -k + 2 to k - 2 do
begin
if getpixel(x + t, y) = snake_color then ending;
if getpixel(x, y + t) = snake_color then ending;
end;
if (x <= 10 + k) or (x >= 630 - k) or
(y <= 40 + k) or (y >= 470 - k) then ending;
end;

procedure point;
begin
inc(points, 5 * sp);
sp := (points div 100) + 1;
str(points, spoints);
setcolor(red);
rectangle(1, 1, 100, 35);
setfillstyle(0, black);
floodfill(2, 2, red);
setcolor(black);
rectangle(1, 1, 100, 35);
setcolor(liter_color);
OutTextXY(10, 10, 'Очки: ' + spoints);
end;

procedure nach;
begin
d := detect;
initgraph(d, m, '');
x := 320;
y := 240;
points := 0;
sp := 1;
appl := false;
i := 1;
n := 2;
setlinestyle(0, 0, ThickWidth);
rectangle(10, 40, 630, 470);
setlinestyle(0, 0, NormWidth);
settextstyle(2, 0, 5);
setcolor(liter_color);
outtextxy(10, 10, 'Очки: 0');
randomize;
repeat moving until j = 5;
repeat moving until false;
end;

Читайте также: