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

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

У меня есть лист1, на котором есть некоторое количество кнопок.
Среди них есть CommandButton2
как, находясь на листе2, макросом скопировать эту кнопку в конкретное место на листе1, например спозиционировать новую кнопку по ячейке С24 и задать новое имя кнопке (.Name, а не .Caption), чтобы я знал это имя и использовал в дальнейшем в работе.

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

Ввести восемь чисел и вычислить сумму чисел кратных трем.

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

Даны три числа. Возвести в квадрат те из них, значения которых неотрицательны. Отрицательные числа оставить без изменения.

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

Дана целочисленная квадратная матрица A(n,n), n<=10. Найти количество чётных элементов, расположенных выше главной диагонали матрицы. Все элементы побочной диагонали заменить на найденное значение. Если чётных элементов выше главной диагонали нет, вывести сообщение и преобразование не делать. Исходную преобразованную матрицу вывести в виде матриц. Количество чётных элементов вывести.
Для решения задачи составить подпрограммы:
— Функцию подсчёта количества чётных элементов выше главной диагонали
— Процедуру преобразование матрицы

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

Даны два числа и операция словом, которую с этими числами нуна провести.
plus — Сложение
minus — вычитание
div — Целое от деления
mod — Остаток от деления
mult — умножение.

Напишите программу, что вычисляет данные числа путем этих операций

Вход: 2 числа «а» и «б» и оператор словом через пробел
Выход: Результат арифметической операции.

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

С помощью функций FindFirstFile/FindNextFile ищу файлы. Но почему то возвращаются лишние файлы.
Например, задаю маску «*.abc», а возвращаются файлы как будто я задал «*.abc*» (кроме, «a.abc», возвращаются «a.abcd», «a.abce» и т.п.).
Это баг или фича?

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

Есть у меня MainMenu. У него есть одно подменю. Все пункты у меня например стоят Checked:=True. Тобишь все галочки установлены. Мне надо по нажатию кнопки на форме убрать галочки со всех пунктов меню и подменю, то есть установить их в False.

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

Подскажите, пожалуйста, каким образом можно форматировать текст в выделенном (setfocus) RichEdit (их на форме несколько)?
Некое подобие одной панели с кнопками (жирный, курсив, цвет текста и.п.) для нескольких RichEdit на форме.

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

Загружаю в WebBrowser свой HTML из файла.
В HTML есть картинки, которые подгружаются с сайта.
Как определить, что все картинки загрузились и страница готова?

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