Iridа troy БИЛЕТ № 15
1. Дайте сведения об основных методах создании таблиц MS Access.
2. В программе MS Excel создайте таблицу истенности для выражения
“АВЛ (ПАУС)“.
3. В среде программировании Delphi создайте приложение выполняющее
перевод денег (сумы) на курсы валют (в доллары, в евро, в рубли).
А
а) Буквы
б) Цифры
в) Ноты
Слуховые:
а) Звук человеческой речи
б) Школьный звонок
в) Звук сирены
Осязательные:
а) Рукопожатие
б) Азбука Брайля
в) "Дай пять"
Обонятельные:
а) Обозначение территории, закрепленной за каким-либо представителем животного мира (например, собаки).
б) Запах чего-то на улице из ближайшего заведения общественного питания.
в) Запах газа при протечке.
Вкусовые:
а) Определение съедобности продукта.
б) Вкус какого-либо продукта питания.
г) Дегустация продукта специальным человеком для проверки на отравленность перед подачей государю.
В человеческом общении применяются зрительные, слуховые и осязательные знаки.
Sub Main()
Dim a(10) As Integer
Dim b As Integer = 1
Dim c As Integer
Dim R As Random = New Random()
For i As Integer = 0 To 10
a(i) = R.Next(12)
Console.WriteLine("[" + i.ToString() + "] => " + a(i).ToString())
Next
For i As Integer = 0 To 10
If ((a(i) Mod 2 = 0) And (a(i) < 0)) Then b = b * a(i)
If ((a(i) Mod 3 = 0) Or (a(i) Mod 5 = 0)) Then c = c + 1
Next
Console.WriteLine("Произведение чётных отрицательных: " + b.ToString())
Console.WriteLine("Кол-во кратных 3 или 5: " + c.ToString())
Console.Read()
End Sub