Вправа 35. Відображення даних у табличній формі | 9 клас | Бондаренко HD

9 клас. Практичні завдання з інформатики за підручником О.О.Бондаренко 2017 року. Вправа 35. Відображення даних у табличній формі. Завдання. У масиві А[1..10] переставити місцями елементи, що стоять на парних і непарних місцях: А[1] ↔ А[2], …, А[9] ↔ А[10]. 1. Створіть новий проект. Змініть значення властивості Caption форми і додайте на форму кнопку Виконати перестановку (див. рисунок). 2. Розмістіть на формі компонент StringGrid і налаштуйте його властивості таким чином: Властивість Значення Властивість Значення ColCount 10 Options.goEditing True FixedCols 0 Options. AlwaysShowEditot True FixedRows 1 Options.goTabs True RowCount 2 3. У процедурі обробки події OnCreate для форми запрограмуйте виведення індексів елементів масиву в зафіксований рядок заголовків стовпців. 4. У процедурі обробки події OnClick для кнопки Виконати перестановку запрограмуйте: а) заповнення масиву значеннями клітинок таблиці StringGrid1; б) попарну перестановку елементів; в) виведення значень елементів масиву до таблиці StringGrid1. var a: array[1..10] of Integer; і, c: Integer; begin For і := 1 to 10 do // заповнення масиву If Length(StringGrid1.Cells[i - 1, 1]) не дорівнює 0 Then a[i] := StrToIntStringGridl.Cell[i - 1, 1]) Else a[i] := 0; і := 1; // перестановка елементів While і менше-рівне 9 do begin c := a[i]; a[i] := a[i + 1]; a[i + 1] := c; і := і + 2 end; { виведення масиву } For і := 1 to 10 do StringGrid1.Cells[i – 1, 1] := IntToStr(a[i]); end; 5. Додайте на форму кнопку Обнулити елементи з парними індексами. У процедурі обробки події OnClick для цієї кнопки запрограмуйте реалізацію таких дій: а) заповнення, масиву значеннями клітинок таблиці StringGrid1; б) заміну нулями елементів, що мають парні індекси; в) виведення значень елементів масиву до таблиці StringGrid1. Перевірте роботу програми. Збережіть проект у папці Вправа 35. Завершіть роботу за комп’ютером. Завантажити текст практичного завдання у форматі docx: https://goo.gl/zdmJom