середа, 28 листопада 2018 р.

лаб роб 7 Розробка власних модулів.

Лабораторна робота № 7
Розробка власних модулів.
Мета: Навчитись складати власні модулі та використовувати їх у власних програмах.

Завдання до лабораторної роботи:

вівторок, 20 листопада 2018 р.

Лабораторна робота №6. Складання програм з використання процедур та функцій.

Лабораторна робота № 7
Розробка програм з процедурами та функціями.

Мета: Навчитись складати та реалізовувати програми із структурами процедур та функції.

Завдання до лабораторної роботи:
1.     Вивчити теоретичний матеріал для складання програм із структурами процедур та функцій мовою Паскаль.

2.     Скласти словесний алгоритм рішення задачі:

 Написати програму мовою Паскаль, яка виводить на очищений екран Ваше прізвище та будує "квадрат" із символів " * " заданої користувачем ширини сторони. Побудову "квадрату" оформити процедурою.

3.     Скласти програму мовою Паскаль рішення виразу:

Ytg a+tg b + tg c + tg k. Для знаходження значення тангенса написати функцію.

4.     Скласти програму мовою Паскаль для знаходження факторіалу введеного числа. Знаходження факторіалу написати функцію.
Використайте знаходження факторіал, як за допомогою ітераційного циклу так і реалізуючи рекурсивний підхід (при N=1 – N= 1 )
Пам’ятайте, що значення факторіалу мають великі числа. Перевірку програми виконуйте в межах числа 10.


5.     Виконати програми, записати результати виконання програми.



6.     Оформити звіт.

вівторок, 13 листопада 2018 р.

Лабораторна робота № 5 Складання програм на опрацювання двовимірних масивів. 4 год

Лабораторна робота № 5
Складання програм на опрацювання двовимірних масивів.
Мета: Навчитись складати та реалізовувати програми по обробці масивів.

Завдання до лабораторної роботи:

четвер, 18 жовтня 2018 р.

Лабораторна робота № 4 Складання програм на опрацювання масивів.

Лабораторна робота № 4
Складання програм на опрацювання масивів.
Мета: Навчитись складати та реалізовувати програми по обробці масивів.

Завдання до лабораторної роботи:
1.     Вивчити можливості мови програмування Паскаль з реалізації  структури масив.
2.     Скласти словесний алгоритм розв’язування задачі (згідно варіанту).
3.     Скласти блок-схему алгоритму.
4.     Скласти програму мовою Паскаль.
5.     Підготувати тести для перевірки правильності Вашої програми.
6.     Виконати програму, записати результати виконання програми.
7.     Оформити звіт.

Лабораторна робота №3 Цикли 19.10

Дати відповіді на запитання


Текст лабораторної роботи 

Лабораторна робота № 3
Складання циклічних програм.
Мета: Навчитись складати та реалізовувати циклічні програми. Навчитись використовувати конструкції циклу: "ДО", "ПОКИ", "Ітераційного"


Завдання до лабораторної роботи:
  1. Вивчити можливості мови програмування Паскаль з реалізації  циклічних структур.
  2. Скласти словесний алгоритм розв’язування задачі (згідно варіанту).
  3. Скласти блок-схему алгоритму.
  4. Скласти програму мовою Паскаль.
  5. Підготувати тести для перевірки правильності Вашої програми.
  6. Виконати програму, записати результати виконання програми.
  7. Скласти алгоритм рішення Вашої задачі за допомогою інших структур циклу. Виканати  алгоритми та порівняти отримані результати.
  8.  Зробити висновок стосовно  доцільності використання  кожного циклу. Яка структура циклу "краще" підходить до Вашої задачі?
  9. Оформити звіт.


1 Завдання до лабораторної роботи:
  1. Знайти суму цілих додатніх чисел, кратних 4 і менших 50.
  2. Знайти суму цілих додатніх парних чисел  менших 100.
  3. Знайти суму цілих додатніх непарних чисел  менших 100.
  4. Знайти суму цілих додатніх чисел, більших 20,  менших 100 і кратних 3.
  5. Знайти значення функції у=SIN 1 +Sin 2+ … Sin N, якщо N =25
  6. Знайти середнє арифметичне число всіх цілих додатніх чисел менших 50.
  7. Знайти середнє геометричне число всіх цілих додатніх чисел менших 10.
  8. Скласти програму знаходження факторіала введеного додатнього числа меншого 50.
  9. Знайти суму цілих додатніх чисел, кратних 7 і менших 100.
  10. Знайти значення функції Sin X  на діапазоні від 0 до 3, 14 з кроком 0,2.
  11. Знайти значення функції Соs X  на діапазоні від 0 до 3, 14 з кроком 0,2.
  12. Знайти значення функції tg X  на діапазоні від 0 до 3, 14 з кроком 0,2.
  13. Знайти сумму всіх непарних чисел менших 100.
  14. Знайти сумму всіх парних чисел менших 100.
  15. Знайти середнє арифметичне всіх непарних чисел менших 100.



Завдання 2.



Скласти програму знаходження всіх простих чисел менших 1000.

четвер, 27 вересня 2018 р.

Лабораторна робота 2 Умова

1. Набрати програму рішення системи Набрати програму рішення системи.  

четвер, 10 травня 2018 р.

Результати семінару

Тим, хто не надіслав повідомлення на семінар - плюс додаткове питання на екзамен.

Лекція № 32. Розробка проекту. Складання форми.

Лекція № 32.  Розробка проекту. Складання форми.

План

Лабораторна робота №17 Створення проекту

Лабораторна робота №17 Створення проекту

Мета: Навчитись створювати власні проекти
Завдання 1.
Побудувати програму "Калькулятор" .
Програма повинна включати продумане оформлення,декілька видів форм, меню, довідку, власну емблему, тощо..

     Передбачити перевірку внесення інформації, створити власну "ізюменку" програми, наприклад переведення значень в інші виміри (дюйми, фути, милі, тощо)


Буде оцінено Ваш підхід до створення інтерфейсу, реагування на внесення дадаткової інформації (компоненту), переміщення по компонентам за допомогою клавіши таб. Ви можете використовувати всі вивчені компоненти, виконувати їх групування, тощо.

      У програмі, за допомогою коментаря, прописати, що виконують відповідні блоки програми.


Продемонструвати роботу програм..

Лабораторна робота №16 Робота з графікою

Лабораторна робота №16 Робота з графікою

Мета: Навчитись використовувати графічні можливості
Завдання 1.
Побудувати малюнок.

Завдання 2.
Створити графік функції

Продемонструвати роботу програм..

понеділок, 7 травня 2018 р.

Работа с графикой в Delphi

Работа с графикой в Delphi 

посилання http://old.kpfu.ru/student/t/delphibook/Chapter%2010/1.htm

 Image2.Canvas.MoveTo(1,(image2.Height div 2));
  x:=-10;
  x0:=100;
  while x<=image2.width do
    begin
     y:=x*x;
     //yy:=Round(y);
     image2.Canvas.LineTo(2*(x+x0),y);
     x:=x+1;
     //sleep(10);
     Application.ProcessMessages;
    end;

субота, 5 травня 2018 р.

Лабораторна робота №15 Створення таблиці

Лабораторна робота №15 Створення таблиці

Мета: Навчитись будувати таблиці

Завдання 1.
Побудувати таблицю як на малюнку.

Створити відповідні обробники подій для редагування таблиці.
Для діагностування вибору активної клітинки вивевести номер стовпчика та рядка та можливість редагування.

Продемонструвати роботу програм..

четвер, 19 квітня 2018 р.

Лабораторна робота №14 Створення інтерфейсу власної форми

Лабораторна робота №14 Створення інтерфейсу власної форми

Мета: Навчитись будувати інтерфейси власної програми.

Завдання 1.
Використовуючи компоненти Edit, ListBox, ComboBox та інших компонентів створити програму, яка буде конструктором  для Вашої форми для опитування.

Завдання 2.
Створити програму, яка буде проводити опитування та записувати результати до файлу протоколу.

Примітка:
При побудові форми опитування максимально використовувати варіанти відповідей у компонентах ListBox, ComboBox у текстових файлах
Прикрасити форму тематичними малюнками.

Продемонструвати роботу програм..

понеділок, 16 квітня 2018 р.

Метод Application.ProcessMessages


Метод Application.ProcessMessages
 Метод Application.ProcessMessages необходимо применять в динамичных приложениях, требующих немедленного отображения выполненных в программе действий. Для повышения быстродействия программы сообщения (Messages!), которые объект Application посылает объектам программы, этими объектами выполняются не сразу после получения, а по мере накопления некоторой очереди.

   Для иллюстрации работы метода Application.ProcessMessages рассмотрим процедуру, троекратным "мельканием" текста в строке ввода обращающего внимание пользователя на то, что данные не введены:

procedure TForm1.Button1Click(Sender: TObject);
 var i: Integer;
begin
 if Edit1.Text='' then
  begin
   for i:=1 to 3 do
    begin
      Edit1.Text:='Введите данные';
      //Application.ProcessMessages;
      sleep(300);
      Edit1.Text:='';
      //Application.ProcessMessages;
      sleep(300);
    end;
   Edit1.SetFocus;
  end;
end;

   Попробуйте выполнить приложение с закомментированными операторами Application.ProcessMessages, и вы никогда не увидите желаемого 
появления-исчезания текста. Программа идёт дальше, невзирая на то, что необходимые действия визуально не отражены на Форме. Теперь раскомментируйте - и желаемый эффект достигнут. Таким образом, метод Application.ProcessMessages заставляет программу немедленно отразить результат действия уже выполненных ею операторов.

   Аналогично, программа, выполняющая длительные вычисления, может выглядеть зависшей, так как даже сообщения на перемещение её окна или нажатия на кнопки не будут обработаны, пока вычисления не будут закончены. Поэтому нужно либо выполнять вычисления в отдельном потоке, либо периодически выполнять Application.ProcessMessages. Однако, в этом случае нужно учитывать, что выполнение этого метода несколько тормозит выполнение программы, и его вызов не должен быть слишком частым.

   Другой пример, связанный с работой с 
графикой в Delphi. Динамика построения графиков функций, когда график рисуется постепенно, по мере вычисления очередной точки, выглядит в программе очень эффектно. Чтобы добиться такого эффекта, также необходимо применять метод Application.ProcessMessages. Вычисляя положение очередной точки, нужно после её выведения на холст:

 Canvas.LineTo(X[n], Y[n]);
 sleep(200);


добавлять:

 Application.ProcessMessages;

   Без применения последнего оператора мы получим сразу готовый график функции, и даже применение оператора задержки перед выводом очередной точки не поможет.

Лабораторна робота №13 Створення меню

четвер, 5 квітня 2018 р.

Лабораторна робота № 12 Середовище delphi Файли

Лабораторна робота № 12 Середовище delphi Файли
Мета: Навчитись складати та реалізовувати програми у середовищі delphi.

Завдання до лабораторної роботи:
  1. Створити програму, яка буде вводити числа з текстового файлу та знаходити:
- кількість додатніх та від'ємних чисел
- середнє значення
- суми додатніх та від'ємних чисел окремо та разом
Файл чисел створити за допомогою блокнота, де в кожному рядку знаходиться одне ціле число. Кількість чисел у файлі невідома.

2. Написати програму, яка буде виводити два випадкових числа та місце для введення відповіді , наприклад суми. Приклад та введене значення відповіді записати у текстовий файл - протокол роботи програми.
Оформити дизайн програми.

3.Продемонструвати роботу програм.

четвер, 29 березня 2018 р.

Лабораторна робота № 10-11 Середовище delphi

Лабораторна робота № 10-11 Середовище delphi
Мета: Навчитись складати та реалізовувати програми у середовищі delphi.


Завдання до лабораторної роботи:
  1. Створити програму, яка буде вводити 2 числа та виводити їх суму, різницю, добуток. Супроводити програму повідомленнями.
  2. Написати програму, яка буде мати десять кнопок з назвами кольорів. При натиску на відповідну кнопку - фон стає заданого кольору.
  3. Написати програму, яка виводить дві кнопки з написом. Зробити так, що при наведенні на кнопку вона зміщується від курсора миші і можна було натиснути лише на другу кнопку.
  4. Задати координати та розміри форми. Розташувати фоновий малюнок. Створити 5 кнопок, при натиску (наведенні) на які будуть відображатись відповідний малюнок.
  5. Створити навчальну програму, яка буде виводити інформацію та демонструвати додавання (віднімання) дробів. Підібрати тематичні малюнки.
  6. Написати назви програм та встановити тематичні іконки на програми.
  7. Продемонструвати роботу програм.

понеділок, 26 лютого 2018 р.

пʼятниця, 9 лютого 2018 р.

Лабораторна робота № 9 Записи

Лабораторна робота № 9 Записи
Мета: Навчитись складати та реалізовувати програми по обробці структури запис.

Завдання до лабораторної роботи:
1.     Вивчити можливості мови програмування Паскаль з реалізації  структури запис.
2.     Написати програму, яка відпрацьовує наступні дії:
1.     створює структуру запис з полями: ім’я, оцінка 1, оцінка 2, рік народження;
2.     виконати введення 5 записів із збереженням їх у типизованому файлі;
3.     виконати пошук записів, які мають хоча б одну двійку;
4.     виконати  виведення на екран імені та середнього балу кожного студента;
5.     добавити до існуючих записів ще три записи і повторити виконання пунктів 3,4.

3.     Продемонструвати виконання роботи. Оформити звіт. У звіт вставити скрін-шоти виконання кожного пункту.

Додаткове завдання:

1.     виконати  виведення запросу (пункт 4) на екран  і у текстовий файл: імені та середнього балу кожного студента. Оформити виведення у вигляді таблиці: перша колонка– номер, друга – ім’я, далі середній бал. 

четвер, 8 лютого 2018 р.

Лабораторна робота № 8 Розробка програм з використанням текстових файлів.

Лабораторна робота № 8 Розробка програм з використанням текстових файлів.

Мета: Навчитись складати програми, які виконують роботу з текстовими файлами.

Завдання до лабораторної роботи: