procedure TForm1.FormPaint (Sender: TObject);
begin
with Form1.Canvas do begin
Pen.Width:=2;
Pen.Color:=clBlack;
Ellipse (100,50,550,550);
Ellipse (200,100,300,400);
Ellipse (220,160,280,370);
Ellipse (230,190,270,350);
Ellipse (240,200,260,330);
Ellipse (350,100,450,400);
Ellipse
Delphi
на delphi
1 Постановка задачи
Написать программу, реализующую тестирование по теме: «Фразы преподавателей ЮУРГТК». Программа должна знакомиться с пользователем, выводить
Delphi
на delphi
1 Постановка задачи
Нужно написать программу кодирования и декодирования текстового файла,
переписывая его в другой файл.
2 Спецификация задачи
Название
Delphi
на delphi
Составить алгоритм упорядочивания слов заданного текста по алфавиту
Имеется текст из нескольких строк; строки разделены возвратами каретки, слова в строке
ЮУПИ
на delphi
Составить алгоритм обработки очереди из поступающих данных.
В функции обработки очереди входят: добавление очередного элемента в конец очереди; выборка
ЮУПИ
на delphi
1. Имеется текст из нескольких строк; строки разделены возвратами каретки, слова в строке разделены пробелами.
2. Определить в какой
ЮУПИ
на delphi
Задание 2
1. Составить алгоритм поиска неупорядоченных данных в массиве вещественных (символьных) строк по заданному ключу поиска.
program Project1;
{$APPTYPE
ЮУПИ
на delphi