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

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

Выяснить, есть ли в каждой строке файла буквы для слова “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 степени.

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

Даны y, x, a, b. Вычислить d=((x*x)-2ab) / ((y*y)+1)
Если d=0, напечатать y, x, a, b.
Если d>0, то вычислить и напечатать P=e^(2х)*sin y-3.
Если d<0, то увеличить в 2 раза y, x, a, b и напечатать.

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

Прога записывает данные в таблицу ListView, мне нужно сделать по всему столбцу поиск на совпадение слова и выдать сообщение, если в данном столбце такого слова нет.

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

Как в Delphi закруглить углы image?

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

Дана целочисленная матрица Q размера nxn и целочисленная матрица P размера mxm, причём 1<m<n. Написать программу для подсчёта количества вхождений матрицы P в матрицу Q в качестве подматрицы.

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

Записать алгоритм, считывающий и суммирующий вводимые с клавиатуры числа до тех пор, пока не будет введён ноль.

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