C# и Pascal Переведите код с паскаля на С

program Text36;
var
F_in,F_out: Text;
Name,S: string;
len,i:integer;
begin
Write('File name in: ');
Readln(Name);
Assign(F_in,Name);
Assign(F_out,'~'+Name);

Reset(F_in);
Rewrite(F_out);
While not eof(F_in) do
begin
Readln(F_in,S);
i:=1;
While (i 0 then
begin
if odd(i) then
begin
delete(S,1,1);
dec(i);
end;
len:=i div 2;
delete(S,1,len);
end;
Writeln(F_out,S);
end;
Close(F_in);
Close(F_out);
Erase(F_in);
Rename(F_out,Name);
end.

1

Задание 5 № 10383

У исполнителя Альфа две команды, которым присвоены номера:

1. прибавь 1;

2. умножь на b

(b — неизвестное натуральное число; b ≥ 2).

Выполняя первую из них, Альфа увеличивает число на экране на 1, а выполняя вторую, умножает это число на b. Программа для исполнителя Альфа — это последовательность номеров команд. Известно, что программа 11211 переводит число 6 в число 82. Определите значение b.

Решение · Поделиться · Сообщить об ошибке Задание 5 № 10384

У исполнителя Альфа две команды, которым присвоены номера:

1. прибавь 1;

2. умножь на b

(b — неизвестное натуральное число; b ≥ 2).

Выполняя первую из них, Альфа увеличивает число на экране на 1, а выполняя вторую, умножает это число на b. Программа для исполнителя Альфа — это последовательность номеров команд. Известно, что программа 11211 переводит число 3 в число 62. Определите значение b.

Решение · Поделиться · Сообщить об ошибке Задание 5 № 10385

У исполнителя Бета две команды, которым присвоены номера:

1. прибавь 2;

2. умножь на b

(b — неизвестное натуральное число; b ≥ 2).

Выполняя первую из них, Бета увеличивает число на экране на 2, а выполняя вторую, умножает это число на b. Программа для исполнителя Бета — это последовательность номеров команд. Известно, что программа 12111 переводит число 7 в число 51. Определите значение b.

Решение · Поделиться · Сообщить об ошибке Задание 5 № 10386

У исполнителя Бета две команды, которым присвоены номера:

1. прибавь 2;

2. умножь на b

(b — неизвестное натуральное число; b ≥ 2).

Выполняя первую из них, Бета увеличивает число на экране на 2, а выполняя вторую, умножает это число на b. Программа для исполнителя Бета — это последовательность номеров команд. Известно, что программа 11121 переводит число 4 в число 72. Определите значение b.

Решение · Поделиться · Сообщить об ошибке Задание 5 № 10387

У исполнителя Гамма две команды, которым присвоены номера:

1. прибавь 3;

2. умножь на b

(b — неизвестное натуральное число; b ≥ 2).

Выполняя первую из них, Гамма увеличивает число на экране на 3, а выполняя вторую, умножает это число на b. Программа для исполнителя Гамма — это последовательность номеров команд. Известно, что программа 11211 переводит число 1 в число 97. Определите значение b.

Решение · Поделиться · Сообщить об ошибке Задание 5 № 10388

У исполнителя Гамма две команды, которым присвоены номера:

1. прибавь 3;

2. умножь на b

(b — неизвестное натуральное число; b ≥ 2).

Выполняя первую из них, Гамма увеличивает число на экране на 3, а выполняя вторую, умножает это число на b. Программа для исполнителя Гамма — это последовательность номеров команд. Известно, что программа 11121 переводит число 3 в число 75. Определите значение b.

Решение · Поделиться · Сообщить об ошибке Задание 5 № 10389

У исполнителя Омега две команды, которым присвоены номера:

1. прибавь 4;

2. умножь на b

(b — неизвестное натуральное число; b ≥ 2).

Выполняя первую из них, Омега увеличивает число на экране на 4, а выполняя вторую, умножает это число на b. Программа для исполнителя Омега — это последовательность номеров команд. Известно, что программа 12111 переводит число 9 в число 77. Определите значение b.

Решение · Поделиться · Сообщить об ошибке Задание 5 № 10390

У исполнителя Сигма две команды, которым присвоены номера:

1. прибавь 1;

2. раздели на b

(b — неизвестное натуральное число; b ≥ 2).

Выполняя первую из них, Сигма увеличивает число на экране на 1, а выполняя вторую, делит это число на b. Программа для исполнителя Сигма — это последовательность номеров команд. Известно, что программа 12111 переводит число 63 в число 11. Определите значение b.

Решение · Поделиться · Сообщить об ошибке Задание 5 № 10391

У исполнителя Сигма две команды, которым присвоены номера:

1. прибавь 1;

2. раздели на b

(b — неизвестное натуральное число; b ≥ 2).

Выполняя первую из них, Сигма увеличивает число на экране на 1, а выполняя вторую, делит это число на b. Программа для исполнителя Сигма — это последовательность номеров команд. Известно, что программа 12111 переводит число 50 в число 20. Определите значение b.

Решение · Поделиться · Сообщить об ошибке Задание 5 № 10392

У исполнителя Альфа две команды, которым присвоены номера:

1. прибавь 2;

2. раздели на b

(b — неизвестное натуральное число; b ≥ 2).

Выполняя первую из них, Альфа увеличивает число на экране на 2, а выполняя вторую, делит это число на b. Программа для исполнителя Альфа — это последовательность номеров команд. Известно, что программа 12111 переводит число 47 в число 13. Определите значение b.

Решение · Поделиться · Сообщить об ошибке Объяснение:

Так как чертёжник оказался в начальной точке, значит после цикла у нас должно получиться число, обратное последней команде. В данном случае 
последняя команда такая: (8, -2), следовательно должны получить (-8, 2).
Возьмём начальную координату (0, 0) т.к. так проще считать.

Посмотрим где будет чертёжник после нескольких выполнений цикла
После первого по координатам х: 0 -1 + 0 + (-3) = -4
После первого по координатам y: 0 -4 + 2 + B = -2 + B

по оси Х нам не хватает ещё одного цикла, значит считаем после второго выполнения цикла
После второго по координатам x: -4 * 2 = -8
После второго по координатам y: (-2 + B) * 2 = -4 + 2B

Кол-во во "повтори" мы нашли. Это 2 т.к. при двух прокатах цикла мы получаем х= -8, что нам и надо чтобы вернуться в начальную точку. 

Осталось найти y. Согласно последней команде, y должен быть обратным -2, следовательно y = 2, составим уравнение и найдём B.
2 = -4 + 2B
-2B = -4 - 2
-2B = -6
2B = 6
B = 3

Отвечаем на поставленный вопрос: A+B = 2 + 3 = 5.
ответ: 5.