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

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

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

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

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

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

Вывести на экран символ, введенный с клавиатуры, в 39 столбец, а 40 столбец заполнить предшествующим по алфавиту символом.

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

Дан массив 5*10 целых двухбайтовых чисел.
Для каждого столбца выяснить имеются ли в нём элементы больше d, имеются ли в нём нечетные элементы,имеются ли в нём одинаковые элементы.
Отсортировать по возрастанию элементы столбца.

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

Марка прибора, наименьшее количество которого поступило в магазин в течение 3 смен, используя функции ПОИСКПОЗ;ИНДЕКС

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

Просуммировать элементы двумерного массива 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 и напечатать.

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

Не могу понять, почему index не увеличивается?

index=prompt('Введите год:',2015);
index=index+1;
alert(index);

Есть ли возможность перевода текстовой строки ‘2015’ в целочисленный? Хотя бы функцию?

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