Практична робота з інформатики для 9 класу. Тема: "Табличні величини"

Про матеріал

Практична робота

Табличні величини

Завдання. Ввести значення елементів одновимірного масиву, що складається з 3 чисел, що міститься в рядках багаторядкового текстового поля, піднести ці числа до квадрата і вивести їх в інше багаторядкове текстове поле.

Перегляд файлу

Практична робота

Табличні величини

Завдання. Ввести значення елементів одновимірного масиву, що складається з 3 чисел, що міститься в рядках багаторядкового текстового поля, піднести ці числа до квадрата і вивести їх в інше багаторядкове текстове поле.

Інструкція до розробки проекту.

Розмістити на формі два багаторядкових текстових поля з іменами Мемо1 і Мемо2 та встановити для них значення властивостей Height = 180,0 ScrollBars = ssVertical, в Lines очистити поле властивостей (видалити Memo1 та Memo2). Розмістити на формі також кнопку TButton, установити для неї     Caption = ‘До квадрата.

Код програми.

procedure TForm1.Button1Click(Sender: TObject);

var a: array [0..2] of real; i: integer;   // об’являємо масив з фіксованою   кількістю елементів (3 елементи) з типом integer (ціле цисло)

begin

for i := 0 to 2 do

a[i] := StrToFloat(Memo1.Lines[i]);  // дані з рядків першого              багаторядкового текстового поля перевести в число і присвоїти відповідним елементам табличної величини

for i := 0 to 2 do

a[i] := a[i] * a[i];  // піднесення до квадрата

Memo2.Clear;  //очищення другого багаторядкового текстового поля

for i := 0 to 2 do

Memo2.Lines.Append(FloatToStr(a[i]));// виведення значень елементів табличної величини в рядки другого багаторядкового текстового поля

  end;                             

 

docx
До підручника
Інформатика 9 клас (Бондаренко О.О., Ластовецький В.В., Пилипчук О.П., Шестопалов Є.А.)
Додано
30 вересня 2018
Переглядів
477
Оцінка розробки
Відгуки відсутні
Безкоштовний сертифікат
про публікацію авторської розробки
Щоб отримати, додайте розробку

Додати розробку