Записать в qbasic. ввести 10 чисел. проверить, есть ли среди введенных ноль. если есть, вывести на экран «есть 0», если нет – «нет 0»10 чисел имеется в виду любых десять)

Const n = 10 dim a(1 to n) as integer dim i as integer, isnull as integer print "вводите числа" for i = 1 to n     input a(i) next i i = 1 isnull = 0 do while i < = n     if a(i) = 0 then isnull = 1     i = i + 1 loop if isnull = 1 then     print "есть 0" else     print "нет 0" end if end

1) если говорить о передаче сообщения в  нашей жизни, при личном  общении, то подойдёт такой вид рассуждений: а)сообщение содержит информацию для конкретного человека - "иванов, иди к доске"б) сообщение содержит информацию для не  конкретного человека - "сегодня всем классом идём на выставку современного искусства" 2) если говорить о способе передаче сообщения в интернете, то пойдёт  такой вид рассуждений: а) сообщение содержит информацию для конкретного человека - например написать сообщение человеку в социальной сети. б)  сообщение содержит информацию для не  конкретного человека - написать сообщение на какую-то публичную страницу (блог, новости и т.д)

        на доске по строчечке  разместились кнопочки  догадайтесь мальчики  как здесь тыкать пальчиком? (клавиатура)  нет, она – не пианино,  только клавиш в ней – не счесть!   алфавита там картина,  знаки, цифры тоже есть.  тонкая натура.  имя ей ).  то-то радость, то-то смех  на бумаге, без огрех,  из какой коробки лезет  текст на удивленье всех?   (принтер)  по ковру зверек бежит,  то замрет, то закружит,  коврика не покидает,  что за зверь, кто угадает?   (мышка)  не зверушка, не летаешь,  а по коврику скользишь  и курсором .  ты – ).  чудо-юдо чемодан  лампа, кнопка да карман.  он окутан   словно город .  (системный блок)