Var
y, x: real;
begin
read(x);
if (x > -20) and (x < -10) then
y := x * x * x * x
else if (x > -10) and (x < -20) then
y := abs(x)
else if ((x > 0) and (x < 20)) or ((x > 30) and (x < 70)) then
y := 45
else if ((x > 80) and (x < 100)) or ((x > 110) and (x < 140)) or (x > 180) then
y := abs(x - 4)
else
y := abs(x + 2);
writeln(x, ' ', y);
end.
<u>4 строчка:</u> отсутствует ";"
<u>4 строчка:</u> write вместо writeln, чтобы не было переноса строки (так как считывание данных должно быть в виде:
<em>write();</em>
<em>readln(a);</em>
<u>10 строчка:</u> отсутствует ";"
За вранье про 30 баллов не старался рисовать XD , а так всё правильно ;)
1. 173
2. 11011
3. 33
4. 1B
5. 36
6. 0 1 2 3 4
7. С<span>имволический метод записи чисел, представление чисел с помощью письменных знаков.
8. А 173 B 22
9. A 10111 B 11101</span>
Так как число в системе счисления с основанием N содержит 4 цифры, то следует найти такое N, для которого выполняется условие N^3 < 31 < N^4.
2^3 = 8, 2^4 = 16 - не подходит
3^3 = 27, 3^4 = 81 - подходит
31(10) = 1011(3)
1011(3) = 1*3^3 + 1*3^1 + 1 = 27+3+1 = 31(10)