Курсовая работа: Метод Жордана Гаусса

Виклик процедури Vikno

Виклик процедури Windo

Закінчення процедури Wind

Заголовок процедури Vvidn

Початок процедури

Виклик процедури Wind із заданням назви виводячого вікна “Ввід розмірності квадратної матриці”.

{063} - {064} Ввід розмірності

{065} - {069} Перевірка умови чи часом не введена розмірність більша за 20, якщо так то виводиться на екран повідомлення “Розмірність повинна бути не більшою за 20”

Кінець процедури Vvidn

Заголовок процедури Vid

Опис використаної у процедурі Vvidn мітки (m8)

Початок процедури

Присвоєння змінній k введеної розмірності системи

{075} - {076} Перевірка умови чи k>4 якщо так то змінній k присвоюється 4, що буде використане для обмеження розмірності вікна.

{077} - {079} Присвоєння змінній позиціонування курсора та змінній організації початкових значень циклів початкового значення j

{080} Виклик процедури Window із вхідними параметрами та назвою виводячого вікна “Ввід елементів”

{081} - {082} Початок циклів нумерації ввідних елементів

{083} - {086} Перехід у позицію з координатами (3,t+1) та вивід на екран “Елемент а[i,j]=” або “вільний елемент [i,j]=” залежно від поточного вводу елемента та очікування вводу цього елемента

{087} Перевірка умови чи вікно вводу повністю заповнене, якщо так то початок складного оператора

{088} – {089} Присвоєння змінній позиціонування курсора та змінній початку циклу по рядках відповідно значень 1 і значення початкового номера рядка

{090} – {094} Перевірка чи остатньовведене число є елементом чи вільним членом. Якщо елементом, то змінній початку циклу по стовпцях присвоюється номер наступного стовпця. Якщо вільний елемент то змінній h стає одиницею, змінна початку циклу по рядкає дорівнює номеру наступного стовпця, якщо вільний елемент то змінна h стає одиницею.

{095} Очистка заповненого елементами вікна.

{096} Передача на мітку M8

{097} Закінчення складного оператора

{098}-{102} Перевірка чи в поточне вікно ще вмітиться наступний елемент: якщо так, то змінна переміщування курсора збільшується на одиницю, а змінній h і z присвоюється початкове значення один.

{103} Закінчення циклу вводу елементів

{104} Закінчення процедури Vvid

{105} Заголовок процедури Obchuslennia

{106} Опис використаних у процедурі міток