8 клас Проєкти з полем, з уведенням даних і виведення результатів

Оберіть рядок, який відповідає правильному опису змінної s типу дійсне число.

Оберіть службове слово, що означає тип данних "цілі числа"

Оберіть команду, що відповідає за зчитування з поля Edit2 цілого числа та присвоювання цього значення змінній a.

Оберіть команду, що відповідає виведенню значення змінної Х у напис Label3. Якщо змінна Х є ЦІЛИМ числом.

Яка властивість відповідає за значення (дані), яке відображається у полі Edit

Команда Var a: integer; означає

Основне призначення компоненту Edit

Оберіть назву числового типу даних, що відповідає значенню змінної -35,5

Уважно розгляньте лінійний алгоритм поданий на рисунку.

Та визначте, яке буде значення змінної p, якщо у Edit1 ввести число 2, а у Edit2 ввести число 3?

Для чого в команді a:=StrToFloat(Edit1.Text); ми записали StrToFloat?

Який текст виводиться у вікно повідомлення?

var A : Integer;

begin

A := 5; A:= 25 - A*2;

ShowMessage(IntToStr(A))

Створіть обробник події Click для кнопки, виконання якого встановить сірий колір тла поля, відступ поля від верхньої межі вікна - 150 пікселів, зменшить відступ поля від лівої межі вікна на 50 пікселів, установить колір тексту синій, виведе в поле текст Ми використовуємо властивості поля!.

procedure TForm1.Button1       [Clik, Click] (Sender: Tobject);

Edit1.Color    [:=, :, =, ;]clGray;

Edit1.        [Lefl, Top, Height, Width]:=150;

Edit1.Left:=            [Edit1.Left, Left, Edit1:Left]-50;

Edit1.Font.Color:=clBlue;

Edit1.Text:=                                        ['Ми використовуємо властивості поля!', "Ми використовуємо властивості поля!", [Ми використовуємо властивості поля!], {'Ми використовуємо властивості поля!}];

Створіть обробник події Click для кнопки, виконання якого встановить сірий колір тла поля, відступ поля від верхньої межі вікна - 150 пікселів, зменшить відступ поля від лівої межі вікна на 50 пікселів, установить колір тексту синій, виведе в поле текст Ми використовуємо властивості поля!.

procedure TForm1.Button1       [Clik, Click] (Sender: Tobject);

begin

Edit1.Color    [:=, :, =, ;]clGray;

Edit1.        [Lefl, Top, Height, Width]:=150;

Edit1.Left:=            [Edit1.Left, Left, Edit1:Left]-50;

Edit1.Font.Color:=cl       [Green, Pink, Blue];

Edit1.Text:=                                        ['Ми використовуємо властивості поля!', "Ми використовуємо властивості поля!", [Ми використовуємо властивості поля!], {'Ми використовуємо властивості поля!}];

end;

Створіть обробник події Click для кнопки, для обчислення значення виразу і виведення результату

procedure TForm1.Button1Click (Sender: Tobject);

var a, b, result:          [real, integer];

begin

a:=            [FloatToStr, StrToFloat, StrToInt] (Edit1.Text);

  [a, b, c]:=StrToFloat (Edit   [1, 2].Text);

       [a, b, result]:=a*(4*b-a);

Edit   [1, 2, 3].Text:=FloatToStr(        [result, a, b])

end;