| Задать вопрос |
|
uses GraphABC;
var
a: boolean;
begin
SetBrushColor(clBlue);
...
|
29.06.2017 18:16
|
3 |
12,735 |
|
unit Graphics;
uses GraphABC;
type
///Style-object
Style = class
private
pC,...
|
29.06.2017 10:19
|
17 |
1,582 |
|
Найти оптимальную ширину лесосеки при заданных значениях запаса леса на 1 га, трудоемкости...
|
29.06.2017 09:44
|
1 |
1,156 |
|
Как сделать так, чтобы окно программы было не поверх всех окон? Программа использует только модуль...
|
28.06.2017 22:43
|
1 |
2,766 |
|
Есть ли в Паскале ABC.NET большее количество вариантов цвета текста, чем 16 в модуле CRT?
|
28.06.2017 17:54
|
3 |
829 |
|
Создать матрицу NxM на интервале от 100 до 500. Найти элемент сумма цифр которого наибольшая,...
|
28.06.2017 14:36
|
2 |
1,322 |
|
Здравствуйте. Мне нужно помощь с доработкой программы. В общем, её суть посчитать сред ариф пар...
|
28.06.2017 13:55
|
4 |
548 |
|
Заполнить двумерный массив следующим образом
1 2 3 ... n-1 n
2 1 2 ... n-2 n-1
3 2 1 ... n-3...
|
28.06.2017 13:44
|
2 |
1,312 |
|
Определить прочность цепного тягового устройства продольного цепного сортировочного...
|
28.06.2017 13:38
|
1 |
1,335 |
|
Сформировать вектор Р(6) из корней 3-х квадратных ур. a1x^+b1x+c1=0, a2x^+b2x+c2=0, a3x^b3x+c3=0....
|
28.06.2017 12:23
|
1 |
1,205 |
|
В соревнования по прыжкам в длину участвуют n спортсменов. Каждый имеет 3 попытки. Все результаты...
|
28.06.2017 07:38
|
2 |
1,312 |
|
type
matrix=array of array of real;
vector=array of real;
var
f: text;
arr: array of...
|
28.06.2017 07:05
|
1 |
935 |
|
Из двух заданных стеков, хранящих символы создать новый стек из тех символов первого стека которые...
|
27.06.2017 22:50
|
1 |
2,359 |
|
1. составить программу которая нарисует две звезды окрашенные в разные цвета
|
27.06.2017 20:04
|
2 |
1,477 |
|
Добрый день! Помогите, пожалуйста, решить задачу:
""Детали"
Имеется N кг металлического сплава....
|
27.06.2017 19:19
|
15 |
25,961 |
|
ЗАвтра экзамен, надо прорешать. Массивы и подпрограммы
В массиве 6х6 выделить главную диагональ, и...
|
27.06.2017 18:25
|
1 |
1,843 |
|
3. написать программу вводит двумерный массив A(N,M) и заменяет все отрицательные элементы на ноль
|
27.06.2017 16:58
|
1 |
1,303 |
|
Я немного тупой и все уроки прогулял. Писал по разному, но ничего не работает. Может знающие люди...
|
27.06.2017 10:59
|
0 |
620 |
|
Дано комплексное число w.
Найти сумму первых десяти членов разложения в ряд функции комплексного...
|
26.06.2017 19:34
|
0 |
493 |
|
Обязательно ли писать для классов интерфейсы (даже если классы простые)?
|
26.06.2017 17:55
|
3 |
978 |
|
ch : char;
...
If ch='1' then Write(F2, ch);
If ch='2' then Write(F2, ch);
If ch='3' then...
|
26.06.2017 17:09
|
4 |
794 |
|
Вот сам код, подскажите, пожалуйста, как правильно сделать чтоб можно было выбирать стрелочками и...
|
26.06.2017 12:06
|
1 |
1,111 |
|
unit Graphics;
uses GraphABC;
type
///Style-object
Style = class
private
pC,...
|
26.06.2017 07:57
|
2 |
622 |
|
///Graph's class
Graph = class
public
///Set of all edges
Edges: set of GEdge;
...
|
25.06.2017 20:08
|
22 |
2,524 |
|
help
|
25.06.2017 19:11
|
5 |
956 |
|
Можно сказать что делегат - некий шаблон для создания функции?
|
24.06.2017 20:50
|
2 |
1,365 |
|
Не работает алгоритм Дейкстры.
Вот код программы:
uses crt,BaseInterpolations, GraphOptimized,...
|
24.06.2017 19:45
|
3 |
4,145 |
|
Даны два массива числовых множеств: A(m) и B(n). Найти все пары множеств Ai и Bj таких, что...
|
24.06.2017 19:43
|
3 |
847 |
|
Хочу сделать нормальный модуль для рисования и обработки графов.
unit Graph2;
uses GraphABC;...
|
24.06.2017 19:39
|
0 |
737 |
|
Хелп плиз
...
|
24.06.2017 19:11
|
0 |
606 |
|
Помогите с задачей ! Найти максимальный поток, который может протекать по сети из узла s в узел t,...
|
24.06.2017 19:07
|
0 |
1,245 |
|
Вычислить функцию и сумму членов соответствующего ряда
Вывести на экран таблицу состоящую из 10...
|
24.06.2017 10:03
|
1 |
1,037 |
|
Найти в каждой строке матрицы координаты элемента, равного k (если он там есть). Метод поиска -...
|
24.06.2017 08:28
|
4 |
3,151 |
|
Напишите блок-схему по готовой программе:
uses crt;
procedure vivod(fname:string);
var...
|
23.06.2017 22:43
|
2 |
529 |
|
procedure p(n,i:integer);
begin
if n<i then p(n+1,i);
write(n,' ');
end;
var n,i:integer;...
|
23.06.2017 22:04
|
1 |
948 |
|
Я хочу загрузить изображение в паскаль из памяти компа и потом по очереди считать цвет каждого...
|
23.06.2017 18:31
|
5 |
4,697 |
|
Помогите с задачей
Известно, что основанием позиционной системы счисления называют количество...
|
23.06.2017 12:12
|
1 |
1,969 |
|
Разработать подпрограмму для вычисления площади кольца.
Использовать разработанную подпрограмму...
|
23.06.2017 07:28
|
3 |
1,737 |
|
Вычислить значение y= f+a , где:
f = ( и далее большая фигурная скобка) z, если z>=0
...
|
22.06.2017 15:08
|
1 |
1,059 |
|
Разработать подпрограмму для вычисления следа матрицы.
Использовать разработанную подпрограмму для...
|
22.06.2017 09:12
|
4 |
1,440 |
|
Как в прямоуголнике написать текст с измениющейся переменной интежер? Например, нужно, чтоб в...
|
21.06.2017 23:14
|
2 |
2,408 |
|
Надо сделать пропорциональное изменение ширины и высоты:
uses GraphABC;
var
W, H: integer;
...
|
21.06.2017 16:03
|
1 |
1,132 |
|
Разработать программу, определяющую первые N натуральных чисел, начиная с числа M, у которых сумма...
|
21.06.2017 12:59
|
2 |
2,043 |
|
Program Z_1_2;
Uses Crt;
const n=3;
var i,j,k:integer;
a,s:array of real;
...
|
21.06.2017 12:49
|
1 |
450 |
|
Дано натуральное число n. Написать рекуррентную процедуру вывода на экран следующей...
|
21.06.2017 11:36
|
5 |
1,241 |
|
Найти номер столбца массива размером МхN, в котором находится наибольшее количество элементов,...
|
21.06.2017 11:35
|
4 |
4,995 |
|
Разработать программу, которая в интервале от N1 до N2 определяет все числа являющиеся...
|
21.06.2017 10:59
|
3 |
1,118 |
|
Даны действительные числа a1,...,an; b1,...,bn .
В данных последовательностях все члены, следующие...
|
21.06.2017 06:12
|
3 |
1,053 |
|
Найти первые m более чем 2-разрядных чисел-палиндромов, то есть чисел, десятичная запись которых...
|
21.06.2017 05:38
|
3 |
770 |
|
Имеется код:
Uses
GraphAbc;
begin
var data := Arr(
(18060, 'Фамилия И.О. №1',...
|
20.06.2017 22:26
|
8 |
1,311 |
| Задать вопрос |