1.Исполнитель Двоечник1 преобразует целое число, записанное на экране. У исполнителя 3 команды, каждой из которых присвоен номер. Умножить на 4Добавить 1Умножить на 2Первая команда увеличивает число на экране в 4 раза, вторая увеличивает число на экране на 1, третья увеличивает число на экране в 2 раза. Программа для исполнителя Двоечник1 - это последовательность команд.Сколько существует команд, которые число 1 преобразуют в число 30 так, что траектория программы проходит через число 10?2.Исполнитель Двоечник1 преобразует целое число, записанное на экране. У исполнителя 3 команды, каждой из которых присвоен номер.Умножить на 3Добавить 1Умножить на 2Первая команда увеличивает число на экране в 3 раза, вторая увеличивает число на экране на 1, третья увеличивает число на экране в 2 раза. Программа для исполнителя Двоечник1 - это последовательность команд.Сколько существует команд, которые число 4 преобразуют в число 28 так, что траектория программы не содержит число 14?
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
-цикл с эпилогом -цикл с параметром -циклический цикл -цикл с неизвестной величиной
Автор: Лифанов_Ольга
Блок-сызба Псевдобкод-сызба Python программалау тілінде-сызба Срлчноо
Автор: ulechkaevseeva
НАДО ВЫБРАТЬ ТРУ ИЛИ ФОЛС
Автор: armusaeff
Фаил занимает 225 мг, сколько вместится на флешку 32 киг.
Автор: elena-novikova-1992
110010011010011 в восьмеричную систему счисления перевести
Автор: Irinalobanowa
function Summa(a,b:integer):string;
var a1,b1:integer;
begin //находим сумму первого числа
a1:=(a div 1000)+((a div 100)mod 10)+((a mod 100)div 10)+(a mod 10);
//находим сумму второго числа
b1:=(b div 1000)+((b div 100)mod 10)+((b mod 100)div 10)+(b mod 10);
//выясняем что больше
if a1>b1 then
Result:='Сумма цифр левого числа больше. Оно равно: '+IntToStr(a1)
else
Result:='Сумма цифр правого числа больше. Оно равно: '+IntToStr(b1);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin //Выполнение и вывод результата функции через нажатие кнопки
Label1.Caption:=Summa(StrToInt(Edit1.Text),StrToInt(Edit2.Text));
end;