Найти сумму элементов квадратной матрицы порядка n (n<=6, задаётся в TEdit), есть отрицательные элементы, найти наибольший из них.

(читать всё…)

Нужно сделать движение объекта Shape с помощью стрелок вверх и вниз.

(читать всё…)

Не сложно найти в интернете как при закрытии сохранить в ini, а при открытии восстановить размеры окна. Не сложно предположить, что так же можно запомнить и статус окна, записав в ini переменную, отвечающую за WindowState.

Если при работе с программой форму развернуть, а потом свернуть — она примет предыдущие размеры и положение. Однако если при развёрнутом виде форму закрыть с записью размеров и положения — запишутся значения, соответствующие максимальному размеру окна и верхней левой его позиции. Соответственно, если после запуска окно свернуть — оно не примет те размеры и положение, которые были перед разворачиванием, а останется в углу и максимальным.

Может, кто-нибудь знает как с этим бороться?

(читать всё…)

Четные столбцы таблицы заменить на вектор Х. Паскаль.

(читать всё…)

Двузначное число делится на 9, если сумма его цифр делится на 9. Определить, делится ли двузначное число, введенное с клавиатуры, на 9.

(читать всё…)

В заданной строке текста определите число групп символов и число групп цифр.

(читать всё…)

Выяснить, есть ли в каждой строке файла буквы для слова “month”. Результат поместить в новый файл в виде: “1” — true; “2” — false; и т.д. (1,2,3, и т.д. — это номер строки, true — если есть, нет — false).
Форма должна содержать 2 компонента Memo: первый компонент должен быть использован при чтении исходного файла, второй компонент при записи преобразованного файла.

(читать всё…)

Найти сумму элементов квадратной матрицы порядка N (N<=6, задаётся в TEdit), есть отрицательные элементы, найти наибольший из них.

(читать всё…)

Просуммировать элементы двумерного массива NxM, сумма индексов которых равна заданной константе К. Значения N и M не превышают 6. Значения N,M и К задаются в TEdit.

(читать всё…)

Нужно написать программу на Паскале, которая бы выводила от 2 в нулевой степени до 2 в 13 степени.

(читать всё…)