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

Пошел дождь. Под протекающую крышу подставили 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

ПОЖАЛУЙСТА!!!!опишите животное,которое кому-то не нравится,показав привлекательные его черты.Составьте это описание в том стиле,в каком написан текст о жабах.(ниже) Некоторые люди панически боятся жаб, не могут преодолеть отвращения к ним. А страшны ли они? У них удивительно-выразительные, "умные" глаза. У глаз подвижные веки, зрачок круглый, черный, а радужная оболочка золотистая или серебристая. Кожа на туловище у жаб не покрыта слизью и никакого дурного запаха не издает. В своих движениях жабы несколько медлительны, как бы неуклюжи, прыгают они не так ловко и проворно, как лягушка, но в целом их туловище совсем не безобразно. Когда жаба прижмется к пеньку, камню или затаится среди зелени, вид у нее просто привлекательный. Почему же у людей поднимается на жаб рука с камнем или палкой? Объяснить это можно только полной безграмотностью в отношении к живой природе, отсутствием необходимого уважения ко всему живому.