12
голосов
Как наиболее эффективно представить код Pascal на C++?
http://ideone.com/yFmnDU
#include <cstdio>
#include <iostream>
using namespace std;
#define var int
#define begin {
#define end ;}
#define readln [](var&a, var&b, var&c, var&...
9
голосов
Принятый
Подскажите несколько несложных алгоритмов хэширования строк
Пожалуйста, открываем исходники класса java.lang.String, находим там метод hashCode:
public int hashCode() {
int h = hash;
if (h == 0 && value.length > 0) {
char val[] = ...
7
голосов
Как задать массив от -100 до 100? числа должны идти по порядку, без рандома
Паскаль позволяет указывать диапазон индексов для массива, поэтому можно сделать так:
A : array [-100..100] of integer
И заполнить в простом цикле:
For i:=-100 to 100 do
a[i] := i;
Рабочий ...
6
голосов
Сортировки, реализация на dotNet
Самая большая проблема вашего вопроса в том, что вы почему-то постеснялись показать свой код. Обсуждение кода без кода - вещь довольно бессмысленная.
Поэтому вкратце:
Сразу на трех алгоритмах - ...
6
голосов
Принятый
Изменять контролы в динамически создаваемом фрейме delphi
Несмотря на то, что подход в ответах Pavel Helmer и Igor имеет место быть, я бы рекомендовал использовать его только для простейших случаев, когда нужно однократно поменять 1-2 свойства в целевом ...
6
голосов
Принятый
Перевести код с Паскаля на VBA
Окей, вы привели ваш код, это уже хорошо.
Смотрите, современные императивные языки все очень похожи друг на друга, поэтому переводить можно практически построчно. Попробуем? Читайте комментарии, они ...
6
голосов
Принятый
5
голосов
Принятый
Как перейти на следующий элемент внешнего цикла?
Самый простой вариант: завести флаг (булевую переменную), и устанавливать его, если элемент найден, в начале каждой итерации внешнего цикла сбрасывать:
for i := 0 to length(ar_mas) do
begin
flag :...
5
голосов
Принятый
Java и Pascal. Цикл while и repeat ... until
Разница есть.
В цикле while условие проверяется до выполнения тела цикла, а в цикле repeat после.
В Java этих операторов нет по той простой причине, что в основу Java положен C-подобный (а не Pascal-...
5
голосов
Не работает простейший код паскаль
a=3200000+231435*x-380000*x;
x=x+1;
В этих строках должно быть := вместо =.
uses Crt;
А эту лучше вообще выкинуть.
Вот тебе 23: https://ideone.com/PDvB7A
5
голосов
Перечисление как индекс для массива
Альтернативный вариант, для коллекции - эмуляция массива с помощью структуры.
type
TMyArr<T> = record
private
FValues : array[0..3] of T;
procedure setValue( c:char; ...
5
голосов
Принятый
Перевод кода с циклом из Pascal в Python
Ваша проблема в том, что в пайтоне range исключает
последний индекс:
n = int(input())
c = 0
for n10 in range (0, n // 10 + 1):
for n5 in range (0, n // 5 + 1):
for n2 in range (0, n // 2 +...
5
голосов
Принятый
Нужно ли использовать begin чтобы сработало else?
Если действие после then одно, то можно и без begin .. end его записать.
begin .. end в условиях, обычно используется для предотвращения ошибок в логике и формирования правильной структуры нескольких ...
5
голосов
Принятый
Почему скорость сортировки данных упорядоченных по убыванию и возрастанию практически одинаковая?
Хм... Вот только что было
Сортировка кучей - не адаптивная (как и сортировка выбором, как и быстрая). Её скорость мало зависит от упорядоченности данных
При построении кучи - при придании массиву ...
4
голоса
Принятый
Преобразование из префиксной записи в инфиксную
Очевидный честный алгоритм — распарсить польскую запись в дерево. Имея дерево, можно рекурсивно строить любые формы записи (а также оптимизировать, компилировать и выполнять, что угодно).
Для записи
...
4
голоса
Взаимодействие div и mod
div и mod - это такие же математические операторы, как +, -, * и т. д. Попробуйте вместо операторов div и mod представить какие-нибудь другие математические операторы, например, + и -, и всё сразу ...
4
голоса
Принятый
Ошибка "Ссылка на объект не указывает на экземпляр объекта"
Вы выделили память только под первое измерение, надо так же выделять под второе
program One;
var
n: integer;
a: array of array of integer;
i, j: integer;
begin
read(n);
SetLength(a, n); /...
4
голоса
Принятый
Никогда не выполняется блок else
Правильно отформатированный код - это, конечно, хорошо, однако Паскаль при определении вложенности операторов ориентируется только на ключевые слова: Если вы пишете оператор else, он считается ...
4
голоса
Как наиболее эффективно представить код Pascal на C++?
int k, l, m, n;
cin >> k >> l >> m >> n;
cout << "поля "<< (k^l^m^n&1 ? "разных цветов":"одного цвета")<<endl;
Мне так больше нравится :)
4
голоса
Как найти натуральные трехзначные числа согласно условию задачи?
Не стоит решать задачу в лоб. Стоит немного подумать и применить математику. Нам известно, что первая цифра числа в три раза меньше последней. Значит она не может превышать 3. Последняя цифра это ...
4
голоса
Принятый
Не изменяется указатель в Delphi
Все логично. ToDel := root^.right; копирует указатель из right в ToDel. Указатель в root и не должен поменяться. Если вам нужно поменять root, делайте так:
ToDel := root^.right;
root^.right := ToDel^....
4
голоса
Pascal writeln Задом наперед
добавляй c к Своей строке и выводи Строку после цикла:
var s:string;
s = c + s;
4
голоса
Java и Pascal. Цикл while и repeat ... until
Разница существенна - цикл с пост-условием (repeat .. until) в любом случае выполнится как минимум 1 раз, вне зависимости от того, какое условие выхода заложено в цикл.
Безусловно, этого же эффекта ...
4
голоса
Принятый
Почему при дробных значениях алгоритм не работает?
Проблема в том, что числа представлены в двоичном виде. Десятичное значение 0,1 не может быть представлено в двоичном виде конечной дробью, оно равно 0,0001100110011...2 или 0,0(0011)2 в стандартной ...
4
голоса
Принятый
Программа на C++ работает правильно, а на Pascal нет
Потому что в С++ int обычно не меньше 32 бит (вряд ли вы 16 бит найдёте), а в Паскале integer именно 16 бит. Вместо него следует использовать LongInt или int64/QWord
Из-за возникновения переполнения ...
4
голоса
Принятый
Перечисление как индекс для массива
Не думаю, что это получится, поскольку буквы не идут по порядку. Я догадываюсь, зачем это вам :), но увы. Если это необходимо для построения дерева, можно пользоваться таким перечислением:
type
...
4
голоса
Принятый
Pascal. Ввод информации в массив и вывод через процедуры
У вас tAuto определен раньше, чем tOption, поменяйте их местами.
Далее, в цикле
for j := 1 to 3 do begin
Writeln('Введите номер: ');
readln(auto.Options[i].ID);
Writeln('Введите название опции: ')...
4
голоса
Ошибка времени выполнения: Индекс находился вне границ массива
Динамические массивы нумеруются с нуля. Цикл for var i:=1 to N do begin должен выглядеть хотя бы так for var i:=0 to N-1 do begin
А вообще стоит оперировать такими функциями работы с массивами, ...
Допускаются только превышающие минимальную длину ответы с наивысшим рейтингом, не являющиеся общими
Связанные метки
pascal × 923pascalabc.net × 144
delphi × 113
freepascal × 78
алгоритм × 62
массивы × 56
c++ × 48
lazarus × 45
python × 31
математика × 20
java × 17
turbopascal × 17
строки × 16
файлы × 16
циклы × 14
сортировка × 14
c# × 13
.net × 12
delphi-7 × 12
c × 10
матрицы × 10
python-3.x × 8
функции × 8
list × 8
рекурсия × 8