Регистрация
bitkut
22.07.2021 05:05
Информатика
Есть ответ 👍

с информатикой 5. У исполнителя Утроитель две команды, которым присвоены номера:
1. прибавь 1
2. умножь на 3
Сколько есть программ, которые число 1 преобразуют в число 20?
ответ:
введите число
6. У исполнителя Калькулятор две команды, которым присвоены номера:
1. прибавь 1
2. увеличь две младшие цифры на 1
Если перед выполнением команды 2 какая-либо из двух младших цифр равна 9, она не изменяется. Сколько есть программ, которые число 23 преобразуют в число 48?
ответ:
введите число
7. У исполнителя Калькулятор две команды, которым присвоены номера:
1. прибавь 1
2. умножь на 2
Сколько есть программ, которые число 1 преобразуют в число 16?
ответ:
введите число
8. У исполнителя Калькулятор три команды, которым присвоены номера:
1. прибавь 1
2. умножь на 2
3. умножь на 3
Сколько есть программ, которые число 1 преобразуют в число 18?
ответ:
введите число
9. У исполнителя Калькулятор три команды, которым присвоены номера:
1. прибавь 1
2. умножь на 2
3. умножь на 4
Сколько есть программ, которые число 1 преобразуют в число 17?

252
461
Посмотреть ответы 1

Ответы на вопрос:

aiis17
aiis17
4,4(74 оценок)
Var a : array [1..10] of integer; i,j : integer; f : boolean; begin f : = true; for i : = 1 to 10 do readln(a); for i : = 1 to 9 do if a > a[i+1] then begin f : = false; break; end if f then writeln('da') else writeln('net'); readln; end .

Популярно: Информатика