Встановіть відповідність між початковими значеннями змінної А і значеннями змінної В після виконання оператора. If A < 5 Then В := А + 1 Else If A < 10 Then В := A * 2 Else В := A + 10; *
В=16; В=25; В=10; В=4;
А= 15;
А= 5;
А= 3;
А= 4;
А= 15;
А= 5;
А= 3;
А= 4;
1. Лабири́нт (др.-греч. λαβύρινθος) — какая-либо структура (обычно в двухмерном или трёхмерном пространстве), состоящая из запутанных путей к выходу (и/или путей, ведущих в тупик). Под лабиринтом у древних греков и римлян подразумевалось более или менее обширное пространство...
2. Нужен дачик ультрозвуковой можно использовать как альтернативу дачик касания, если лабиринт одного цвета то можно использовать дачики цвета.Из этих дачиков можно проходить лабиринт главное разобраться в програмировании робота и какой тебе удобно дадчик.лично я бы использовал дачик цвета и касания.
3. Правило правой руки или одной руки.
Универсальный алгоритм прохождения любых лабиринтов был описан только через столетие в книге французского математика Э. Люка "Recreations matematiques", изданной в 1882 году. Интересно, что Люка при описании алгоритма указал на первенство другого французского математика М. Тремо. Таким образом, алгоритм стал известен как алгоритм Люка-Тремо.
Тремо предлагает следующие правила: выйдя из любой точки лабиринта, надо сделать отметку на его стене (крест) и двигаться в произвольном направлении до тупика или перекрестка; в первом случае вернуться назад, поставить второй крест, свидетельствующий, что путь пройден дважды - туда и назад, и идти в направлении, не пройденном ни разу, или пройденном один раз; во втором - идти по произвольному направлению, отмечая каждый перекресток на входе и на выходе одним крестом; если на перекресте один крест уже имеется, то следует идти новым путем, если нет - то пройденным путем, отметив его вторым крестом.
Объяснение:
А)
program num;
var
number: integer;
begin
read(number);
if (number mod 2 = 0) then
write('ДА')
else
write('НЕТ');
end.
Б)
program b;
var
first, second: integer;
begin
read(first, second);
if (first > second) then
write(first + second)
else
write(first * second);
end.
Объяснение:
А)
program num; // Название программы
var
number: integer; // Целочисленная переменная, хранящая вводимое с клавиатуры число
begin // Начало программы
read(number); // Считываем число с клавиатуры
if (number mod 2 = 0) then // Если остаток от деления значения переменной number на 2 = 0, тогда
write('ДА') // Выводим "Да"
else // Иначе
write('НЕТ'); // Выводим "Нет"
end. // Конец программы
Б)
program b; // Название программы
var
first, second: integer; // Целочисленные переменные, хранящие вводимые с клавиатуры числа
begin // Начало программы
read(first, second); // Считываем числа с клавиатуры
if (first > second) then // Если первое число > второго числа, тогда
write(first + second) // Выводим сумму этих чисел
else // Иначе
write(first * second); // Выводим произведение этих чисел
end. // Конец программы