пʼятниця, 15 жовтня 2021 р.

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

  Лабораторна робота № 4

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

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

пʼятниця, 8 жовтня 2021 р.

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

 Лабораторна робота № 3

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

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

понеділок, 10 травня 2021 р.

Лабораторна робота №16 Створення діалогової програми (4 год)

    Лабораторна робота №16  Створення діалогової програми

Мета: Навчитись створювати -програми мовою Delphi

Завдання 1.

Створити міні-програму, наприклад: Тестування.  Програма повинна вести діалог із користувачем. Діалог записати у текстовий файл.

У своїй програмі повинно бути меню, конктесне меню, передбачити оформлення програми та логіку роботи програми.

Оформити та продемонструвати роботу .

четвер, 6 травня 2021 р.

Семінарське заняття 2

 Інструкційна картка до проведення

семінарського заняття № 2
Тема заняття: Сучасний стан та перспективи розвитку програмування.
Мета заняття: поглибити знання студентів з напрямку програмування

Після вивчення теми студент повинен
знати: що таке проект, розуміти модульний підхід, розумітись у сучасних мовах програмування.
вміти: складати користувацькі програми.

Звітність: надрукований матеріал (2-3 сторінки, обов'язкова вказувати джерела ), при потребі презентація, приклад програми. В електронному вигляді матеріал надіслати на адресу:     ms.niko@i.ua 

у рядку тема написати "Семінарське заняття 2" та тему: ... написати тему повідомлення.


тестування №2 07 травня 2021

 пройдіть тестування.Посилання

понеділок, 26 квітня 2021 р.

Лабораторна робота №15 Створення рухомих графічних примітивів

Додаткова інформація Метод Application.ProcessMessages  

   Лабораторна робота №15  Створення рухомих графічних примітивів

Мета: Навчитись створювати -програми мовою Delphi

Завдання 1.

На Вашому попередньому малюнку (лабораторна робота 14) створити рухомий об'єкт. (Дивись приклад)

Оформити та продемонструвати роботу .

Відео: 



unit Unit1;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, StdCtrls, Buttons, ExtCtrls;

type

  TForm1 = class(TForm)

    Shape1: TShape;

    BitBtn1: TBitBtn;

    BitBtn2: TBitBtn;

    procedure BitBtn1Click(Sender: TObject);

    procedure FormCreate(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

var

  Form1: TForm1;

  i:integer;

implementation

{$R *.dfm}

procedure TForm1.BitBtn1Click(Sender: TObject);

begin

   Form1.BitBtn1.Visible:=false;      //робимо кнопку старт невидимою

  for i:=0 to   (form1.clientwidth-shape1.Width) div 2 do

  // цикл до половини заданої ширини форми форми

         begin

         shape1.Visible:=false;  //фігуру зробили не видимою

         shape1.Left:=shape1.Left+1;  //змістили координату по Х

         shape1.Top:= shape1.Top -1; //змістили координату по  У

         sleep(10);             //затрика

         shape1.Visible:=true;    //фігуру зробили видимою

         application.ProcessMessages;  //метод який вимагає миттєвого виконання

        end;

        for i:=i to   form1.clientwidth-shape1.Width do

         begin

         shape1.Visible:=false;

         shape1.Left:=shape1.Left+1;

         shape1.Top:= shape1.Top +1;

         sleep(10);

         shape1.Visible:=true;

         application.ProcessMessages;

        end;

  Form1.BitBtn2.Visible:=true;

end;

procedure TForm1.FormCreate(Sender: TObject);

begin

  Form1.BitBtn2.Visible:=false;

end;

end.


четвер, 22 квітня 2021 р.

Лабораторна робота №14 Створення графічних примітивів

   Лабораторна робота №14  Створення графічних примітивів

Мета: Навчитись створювати -програми мовою Delphi

Завдання 1.

Створити програму, яка можливостями мови створить малюнок. 

Завдання 2.

Виконати підпис малюнка (ПРІЗВИЩЕ)  за допомогою графічних примітивів. 

Оформити та продемонструвати роботу .