Questions tagged [pascal]

Pascal — императивный язык программирования созданный в 70-х, 80-х годах. При использовании метки по возможности уточняйте современную версию языка Delphi, Free Pascal и PascalABC.NET

Описание

Pascal — императивный язык программирования, в 70-х и 80-х годах активно использовался при обучении. На постсоветском пространстве, в ряде европейских и южноазиатских стран часто используется для обучения до сих пор. Современные версии — Delphi, Free Pascal и PascalABC.NET.

Особенностями языка являются строгая типизация и наличие средств процедурного программирования.

Диалект Object Pascal, разработанный в 1985 году, поддерживает объектно-ориентированное программирование. Object Pascal в последующем был переименован в Delphi.

Ссылки

Пример

program p;
begin
  writeln('Hello, World!')  { оператор вывода строки }
end.
933 questions
4
votes
3 answers

Многопотоковое программирование в Паскале.

Есть ли возможность многопотокового программирования в Pascal?
delphikettle
  • 1,330
  • 4
  • 24
  • 50
4
votes
2 answers

Сложности с пониманием темы "Множества" в Turbo Pascal.

Здравствуйте! Снова обращаюсь к знатокам :) Вопрос от новичка, который только-только начал изучать Turbo Pascal и постепенно добрался до темы «Множества». Тема в общем смысле кажется понятной, но, в то же время кажется, что… ничего совсем не…
3
votes
1 answer

Как создать N размер массива задаваемый пользователем PASCAL

Нужно что бы пользователь мог задать N размер массива, как это можно реализовать?
2
votes
1 answer

Ошибочная ссылка на переменную

Стараюсь сделать,что бы кружки спавнились и шли по своей траектории. Для этого сделал координаты x и y массивами, но выдаёт ошибку. До этого я x1 не представлял как массив, из-за чего кружки спавнились почти друг на друге. Помогите решить…
СOM
  • 61
2
votes
1 answer

Функции в функцие

Можно ли задать несколько функции внутри другой? И если это возможно, как вызвать только одну внутреннюю?
2
votes
1 answer

Pascal треугольник паскаля, по правому краю

program PascalTriangle; var a:array[1..15,1..15] of integer; i,n,j:integer; f,g:text; st1,st2,st3:string; begin read(n); a[1,1]:=1; For i:=2 to n+1 do For j:=1 to n+1 do If (j=1) or (j=i) then a[i,j]:=1 else …
Ага
  • 107
2
votes
1 answer

Скорость вывода текста в pascal

Нужно выдавать пользователю много текста. Можно ли сделать отрезки времени в секундах между очередным writeln? Где-то слышал, что можно выводить текст так, как будто он печатается прямо сейчас, а не сплошником в один миг, такое возможно?
2
votes
0 answers

Определить, является ли текст правильной записью римскими цифрами целого числа

Помогите решить, не могу понять задачу. Или объясните как ее решать: Дан текст из заглавных латинских букв, за которым следует пробел. Определить, является ли этот текст правильной записью римскими цифрами целого числа от 1 до 999, и если является,…
Yasha
  • 21
2
votes
1 answer

Проверка строки на число Pascal

по сути, нужно проверить что в строке, число или нет и в зависимости от результата действовать. Пытался через val, но это не логическая функция( Program prov; var s,s1:string; b,x,e:integer; begin writeln('vvedite stroku'); read(s); …
mayhem
  • 31
2
votes
1 answer

Переписать python на pascal

n = int(input()) a = [] m0 = 0 m1 = 0 ms = 0 for i in range(6): a.append(int(input())) a.append(0) for i in range(6, n): a[6] = int(input()) if a[0] % 2 == 0 and a[0] > m0: m0 = a[0] if a[0] % 2 == 1 and a[0] > m1: m1…
2
votes
2 answers

if s[i] in ['A','B','E','F'] then пишет Ошибка времени выполнения: Индекс находился вне границ массива. Как исправить?

program z1; var s:string; i,L,maxL:integer; begin readln(s); L:=0; maxL:=0; for i:=0 to length (s) do if s[i] in ['A','B','E','F'] then begin L:=L+1; if L>maxL then maxL:=L; end else L:=0; writeln(maxL); end.
1
vote
0 answers

найти минимальное значение из 5 чисел. эффективная программа

найти минимальное значение из 5 чисел. эффективная программа
1
vote
2 answers

Pascal. Вложить onclick в другой onclick

Программа вычисляет результат функции. На форме есть выпадающее меню с действием "Вычислить" и кнопка "Вычислить". У меня есть событие на простую кнопку. Можно ли чтобы при нажатии на элемент "Вычислить" из списка делалось тоже самое что и на…
Илья
  • 105
1
vote
1 answer

Текст в графике

Доброго времени суток! Рисую число '1234' с помощью OutTextXY(x,y,'1234'); Хочется затереть, например, цифру 3. Где она - узнать труда не составляет. Допустим, (x1,y1) - её координаты. Хотелось бы лениво вывести символ какой-нибудь в это место,…
mike_live
  • 147
1
vote
1 answer

Чтение числе из файла. PASCAL

Помогите написать подпрограмму , которая будет читать числа из файла и писать их в список. Например, в файле написано: "10 100 59 3 2 45" Я не могу придумать метод, как посчитать число, которое больше одного символа, как одно число.
1
2 3
21 22