Во Среда исполнителя Робот - ...
а) прямоугольное клеточное поле
б)шестиугольное клеточное поле
в)белое чистое поле
г)весь экран компьютера
Во На сколько клеток сместиться Робот по команде вниз?
а)до конца поля
б) на 5
в)на 1
г)на 2
Во На сколько клеток сместиться Робот после выполнения группы команд: вниз; вправо; закрасить;
а) останется на месте
б)на 1
в)на 2
г) на 3
Во При использовании в тексте алгоритма циклов иногда возникает ситуация зацикливания. Это означает ...
а) исполнение цикла не начнется
б)исполнение цикла не закончится никогда
в)исполнитель устанет
г)исполнение алгоритма замедлится
Во Продолжите:
В цикле могут использоваться более сложные условия, которые называются составными. Они получаются из условий с служебных слов ...
Во Из предложенных ниже выберите составные условия
а) слева стена
б)не справа стена
в)справа стена и слева стена
г)слева стена или справа стена
д)справа свободно
носи́тель) — любой материальный объект или среда[уточнить], используемый человеком достаточно длительное время сохранять (нести) в своей структуре занесённую на него информацию, без использования дополнительных устройств (например, источника энергии).
Это может быть, например, камень, дерево, бумага, металл, пластмассы, кремний (и другие виды полупроводников), лента с намагниченным слоем (в бобинах и кассетах), фотоматериал, пластик со специальными свойствами (например, в оптических дисках) и другие.
Носителем информации может быть любой объект, с которого возможно (доступно) чтение (считывание) имеющейся на нём (нанесённой, записанной) информации.
Var a,b,c, D, Result : Integer;
Assign(InFile, "C:\kvur.txt");
Assign(OutFile, "C:\korni.txt")
Reset(InFile)
Read(InFile,a)
Read(InFile,b)
Read(InFile, c)
D = sqr(b) + 4*a*c
if D = 0 then
Write("Уравнение не имеет корней")
Else
Append(OutFile)
Result:=(-b + sqrt(D)) / 2 * a
Write(OutFile,Result)
Write("Корень уравнения")
WriteLn(Result)
if (D>0) then
Result:=(-b - sqrt(D)) / 2 * a
Write(OutFile, Result)
Write("Второй корень уравнения")
Write(Result)
End;
End.