У мальчика 40значков на тему"Спорт".Это только седьмая часть всех его значков.Сколько всего знаков у мальчика?

реши уравнения 387:x=513:57 a:6=54 умножить на 8 3210-k=665:7

Пошел дождь. Под протекающую крышу подставили 9 Горшков,кастрюли банок. Сколько было Горшков, кастрюль и банок в отдельности если Горшков и кастрюль было 6 а кастрюль и банок5?

завезенное в Европу из америки растение из  семян которого получается вкусный напиток и сладкое лакомство

Пожалуйста помогите с тестом по информатике! Заранее спасибо. 

Программа VisualBasic

1) Какой объём памяти нужно выделить под хранение переменной, если её значения находятся в диапазоне [0, 1000]? 
а)10 байт 
б)11 бит 
в)1 байт 
г)10 бит 

2) Какой из перечисленных операторов нужно применить для вывода значения переменной в текстовое поле? 
а)Label1.text = str(x) 
б) TextBox1.text = str(x) 
в)X= val(Label1.text) 
г)X= val(TextBox1.text) 

3)В программном коде для вычисления среднего арифметического двух чисел пропущены слова 
… a, b, c … Single 
a= … (TextBox2.text) 
b= … (TextBox1.text) 
c= (a +b) / 2 
TextBox3.text= … (c) 
Выберите правильную последовательность вставок 
1. as, Dim,str, val, val 
2. Dim, as, val, val, str 
3. str, as, val, val, dim 
4. Dim, as, str, str, val 

4) Какое максимальное значение числа можно использовать, если для его хранения отводится 5 бит? 
1. 32 
2. 31 
3. 255 
4. 256 

5) Дан программный код обработки нажатия кнопки: 
Dim a, b as integer 
a = val(TextBox1.text) 
b = 2* A – 5 
If b>0 then 
Label1.text = “b=“ & str(b) 
else 
Label1.text = “a=“ & str(a) 
end if 
Что будет напечатано на форме после его выполнения, если в текстовое поле ввести значение 7? 
1. a = 7 
2. b = 9 
3. 9 
4. 7 

6) Дан программный код обработки нажатия кнопки: 
Dim a, b as integer 
a = val(TextBox1.text) 
b = 2* A – 10 
If b>0 then 
Label1.text = “b=“ & str(b) 
end if 
If b<0 then 
Label1.text = “a=“ & str(a) 
end if 
Что будет напечатано на форме после его выполнения, если в текстовое поле ввести значение 5? 
1. a = 5 
2. Ничего 
3. b = 0 
4. 5, 0 

7) Требуется составить программный код для вычисления массы полого шара. Исходные данные: внешний радиус шара, толщина стенок и плотность материала 
Невнимательный программист составил код, но перепутал строчки. 
1. Label3.text = “Масса шара= “ & str(x) 
2. D= val(TextBox4.text) 
3. Dim ro, r, d, mas as single 
4. R= val(TextBox1.text) 
5. Mas=ro * 3 * 3.14 * (R * R * R - (r – d) * (r – d) * (r – d)) /4 
6. Ro= val(TextBox2.text) 
В какой последовательности должны быть расставлены операторы? 
1. 3 2 4 6 5 1 
2. 1 2 3 4 5 6 
3. 2 4 6 1 5 3 
4. 1 2 3 4 5 6