Var y,x: string;
i,k: integer;
begin
k=0;
read (x);
for i:=1 to length(x) do
begin
y:=copy(x, i,3);
If (y='sin') then begin
delete (x, i, 3);
insert ('cos', x, i);
k:=k+1;
end;
writeln (x);
writeln (k);
end.
выражение c:=a=b; означает положить в переменную с результат сравнения переменных a и b и делать это пока a < b, вероятней всего программа зациклится
<span>Если бы было написано</span>
<span><span>while a<b do c:=a:=b;</span></span>
тогда цикл отработает 1 раз и все 3 переменные будут равны b
<h2>Пункт 1</h2>
0 · 2⁷ + 0 · 2⁶ + 1 · 2⁵ + 0 · 2⁴ + 0 · 2³ + 1 · 2² + 1 · 2¹ + 1 · 2⁰ = 0 + 0 + 32 + 0 + 0 + 4 + 2 + 1 = 39₁₀
<h2>
Пункт 2</h2>
1 · 2⁷ + 1 · 2⁶ + 0 · 2⁵ + 0 · 2⁴ + 1 · 2³ + 1 · 2² + 1 · 2¹ + 0 · 2⁰ = 128 + 64 + 0 + 0 + 8 + 4 + 2 = 206₁₀
<h2>Пункт 3</h2>
1 · 2⁷ + 0 · 2⁶ + 1 · 2⁵ + 0 · 2⁴ + 1 · 2³ + 0 · 2² + 1 · 2¹ + 0 · 2⁰ = 128 + 0 + 32 + 0 + 8 + 0 + 2 + 0 = 170₁₀
<h2>Пункт 4</h2>
0 · 2⁷ + 1 · 2⁶ + 1 · 2⁵ + 1 · 2⁴ + 1 · 2³ + 1 · 2² + 1 · 2¹ + 0 · 2⁰ = 0 + 64 + 32 + 16 + 8 + 4 + 2 + 0 = 126₁₀
Просто дели его до конца на 2, остатки - это и есть результат перевода.
333 = 101001101
Для того что бы его пройти нужно :
(Сложный путь - честный)
1.Знание Математики за шестой класс! (Там встречаются примеры на тему "Целые числа")
2. Запомнить "здание игровой школы" , что бы знать все ходы и что где лежит!
3. Быть аккуратным -
-тратить предметы только в нужный момент
-редко тратить "полоску бега" (стамину)
-Пытаться не попадаться - хулигану, директору (дежурному)
4. Решать правильно все примеры.
(Глючные не считаем - так задумано игрой!)
5. Сноровка, реакция и скорость мышление!
(Путь легкий - мод, читерство)
1.Качай изи мод!
2.Пиши во всех примерах "0"
3.Уйди за текстуры!
(Этот способ не считается. Ведь не увидишь экран "ты выиграл"!)
УДАЧИ!