Задачі

В одній формі передбачити ввід елементів масиву в ListBox і вивід результату в інший ListBox. По кожному введеному користувачем елементу масиву знайти функцію y:=1+2*sqr(x); і занести результат в ListBox. Розв'язати задачу за допомогою циклу for.

Використовуються компоненти і встановлюються їх властивості

Компоненти	Властивості	Значення
Form1	Caption	Обробка одномірного масиву
Label1	Caption	Введіть
Label2	Caption	число елементів N=
Label3	Caption	Елемент A[i]=
Label4	Caption	Масив даних
Label5	Caption	Результат
Edit1	Text	пусто
Edit2	Text	пусто
Button1	Caption	Додати елемент в масив
Button2	Caption	Розв'язок
Button3	Caption	Вихід
ListBox1	-	-
ListBox2	-	-

Створення програми вимагає знання функцій і команд delphi:

• x, y : array [1..20] of Real; : ShortString змінні x, y будуть масивами з елементами типу Real, індекси елементів від 1 до 20
• StrToInt перетворює значення типу рядок в значення типу Integer
• StrToFloat перетворює значення типу рядок (що вміщує число) в значення типу Float
• FloatToStr перетворює значення типу Float в значення типу рядок
• Form1.ListBox1.Items.Add; додати до списку один елемент
• sqr піднесення в квадрат
• for i:=1 to n do цикл, в якому змінна і проходить значення від 1 до n включно (з кроком 1)
• Form1.ListBox1.Items.Strings[i-1] повертає значення i-1 -го елементу списку (елементи нумеруються від 0)

Дано масив з 10 елеменов. Перші 4 впорядкувати по зростанню, останні 4 по спадаючій.

Алгоритм вирішення задачі:
В даному випадку використовується сортування методом бульбашки.

Виникають складності при сортування останніх чотирьох елементів масиву. Кількість проходів (i) і кількість порівнянь (j) такі ж як в першому випадку. Однак номера елементів стоять далі від початку на 6 значень. Тому простіше при обм

іні додавати до j 6.


































В однорідному масиві, шо складєьться з N  елементів, знайти максимальний по модулю елемент масиву.

Сортування масиву методом бульбашки

Перевести фунти у кг використовуючи вказівку вибору

Масиви. Теорія+ задачі

Задача

Дано три дійсних числа. Вибрати з них ті, які належать інтервалу (1,3)

Задача

Використовуючи одну й ту ж форму для введення і виведення даних, по введених користувачем x, y, r знайти, чи лежить точка P (x, y) в окружності радіуса r з центром на початку координат (включаючи саму окружність) або за колом.

Створення програми вимагає знання функцій і команд delphi:

     s: ShortString мінлива s матиме тип ShortString (короткий рядок)
     StrToFloat перетворює змінну типу рядок (що містить число) в змінну типу Float
     FloatToStr перетворює змінну типу Float в змінну типу рядок
     sqrt витягує квадратний корінь
     sqr зведення в квадрат
     if перевірка умови - then виконується, якщо умова істина else - виконується в протилежному випадку

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

VAR починає розділ оголошення змінних

i, N, K: integer; змінні i, N, K матимуть тип integer

Writeln виводить на дисплей в новий рядок свої аргументи

Readln зчитує введені користувачем дані з клавіатури і вносить отримане значення в змінну

For i: = 1 to N do виконується цикл, в якому змінна i приймає значення від 1 до N

Round функція округлення аргументу

X: array [1..20] of real масив X буде мати елементи з номерами від 1 до 20 включно, тип кожного елемента real

BEGIN початок виконання програми

END. кінець виконання програми