Var n:string;
begin
readln(n);
writeln('Число сотен: ',n[4]);
writeln('Число тысяч: ',n[3]);
<span>end.</span>
Var
i, s: integer;
begin
s := 0;
for i := -5 to 28 do
s := s - i;
writeln(s);
end.
1)y:=sqrt(a)-sqr(c)/sin(x-sqr(a))
2)y:=sqrt(c)/x-sqr(a)+3*pi
3)y:=3*b-1/8*(c+2)-sqrt(5*b)-8*c+3*pi
4)p:=sqrt(sqr(sqr(x)-x)+sqr(sqr(y)-y))
1. Появление
2. Панорама
3. Фигура
4. Случайные
5. Растворение
6. Часы
7. Рябь
8. Блеск
9. Воронка
10. Отражение
11. Чертово колесо
12. Поворот
13. Окно
14. Орбита
15. Плавный вылет
Значит так,в 5 номере мы имеем две команды: 1 - возведи в квадрат и 2 - прибавь 1. По условию из числа 1 мы должны сделать число 10 используя не более четырёх команд. Поехали.
2 (добавляется +1 к числу 1)
1 (возводит в квадрат наше число,значение которого уже равно двум)
2 (добавляет +1 к нашему числу,имеющее значение 8)
2 (добавляет +1 нашему числу,имеющее значение 9)
Вот так вот у нас получилось число 10.
Так же есть второй способ,не буду его расписывать,укажу в ответе.
Ответ : 1) 2 1 2 2 либо 2) 2 2 1 2
В 6 задании идентичная задача.Цель: из 4 получить 58.Перейдём сразу к решению.
1 (добавляется +3 к числу 4)
2 (возводится в квадрат число 7)
1 (добавляется +3 к 49)
1 (добавляется +3 к 52)
1 (добавляется +3 к 55)
Ответ: 1 2 1 1 1