Во Для размещения на форме флажка нужно дважды щелкнуть на кнопке на вкладке Standard с компонентами.
TComboBox
Edit
TRadioButton
TCheckBox
Во
Для размещения на форме поля с раскрывающимся списком нужно дважды щелкнуть на кнопке на вкладке Standard с компонентами.
TCheckBox
Edit
TRadioButton
TComboBox
Во Для размещения на форме переключателя нужно дважды щелкнуть на кнопке на вкладке Standard с компонентами.
Edit
TCheckBox
TRadioButton
TComboBox
Во Для чего используют переключатели?
Для выбора нескольких вариантов
Для выбора одного варианта из нескольких возможных, например, установить для определенного свойства объекта одно значение из некоторого определенного набора значений
Для ввода текста
Отсутствует правильный ответ
Во
Свойство Checked флажка может принимать одно из двух значений:
true или false
отсутствует правильный ответ
0 или 1
правильно или неправильно
22
Объяснение:
Понятно, что каждая из команд может только увеличить число.
У нас обязательно есть число 16, из него есть два пути:
1. сделать +1
2. сделать x2
Если мы сделаем +1, то после этого уже точно не сможем сделать x2, т.к. 17 x 2 = 34, а 34 > 33, а уменьшить число мы не сможем. Если мы будем делать постоянно +1, то мы точно пройдём через 30.
Значит не нужно делать +1, когда мы на числе 16, а надо делать x2.
Следовательно, концовка у нас точно будет такая 16 -> 32 -> 33.
Теперь надо посчитать, сколько различных получить 16 из 2. К любому такому мы допишем нашу концовку и получим программу подходящую под наши условия, и к тому же все программы, подходящие под данные условия, выглядят именно так.
Считать сколькими можно получить 16 из 2 будет динамическим программированием.
ans[i] - количество различных программ, которые получают i из 2.
Очевидно, ans[2] = 1 (пустая программа).
ans[3] = 1 (нужно сделать +1)
ans[4] = ans[3] + ans[2] = 2 (можно сделать +1 к 3, а можно x2 к 2)
Далее вычисления всегда следующие:
ans[i] = ans[i - 1] + ans[i / 2] для чётных i (можно либо добавить +1 к числу i - 1, либо сделать x2 для числа i / 2)
ans[i] = ans[i - 1] для нечётных i (можно получить только путём добавления +1 к числу i - 1)
Итак, считаем:
ans[2] = 1
ans[3] = ans[2] = 1
ans[4] = ans[3] + ans[2] = 2
ans[5] = ans[4] = 2
ans[6] = ans[5] + ans[3] = 4
ans[7] = ans[6] = 4
ans[8] = ans[7] + ans[4] = 6
ans[9] = ans[8] = 6
ans[10] = ans[9] + ans[5] = 8
ans[11] = ans[10] = 8
ans[12] = ans[11] + ans[6] = 12
ans[13] = ans[12] = 12
ans[14] = ans[13] + ans[7] = 16
ans[15] = ans[14] = 16
ans[16] = ans[15] + ans[8] = 22
Значит 16 из 2 можно получить И столькими же можно получить 33 из 2 выполняя условия задачи.
var
a: string;
b: integer;
begin
writeln('Сколько тебе лет?:');
readln(b);
if b > 17 then begin
writeln('В каком институте ты учишься?:');
readln(a);
writeln(a, ' хороший институт');
writeln('До следующей встречи!');
end
else
if b <= 17 then begin
writeln('В какой школе ты учишься?');
readln(a);
writeln(a, ' не плохая школа');
writeln('До следующей встречи!');
end;
end.