10 rem
20 input d
30 let k=4.3*sin(exp(<span>1/d)+2)/(d+2,1)-6,7*d
40 print "k=";k
50 end
</span>
113₁₆ = 1×16²+1×16+3 = 256+16+3 = 275₁₀
2ACF₁₆ = 2×16³+10×16²+12×16+15 = 8192+2560+192+15 = 10959₁₀
691₁₆ = 6×16²+9×16+1 = 1536+144+1 = 1681₁₀
D306F₁₆ = 13×16⁴+3×16³+0×16²+6×16+15 = 851968+12288+0+96+15 = 864367₁₀
112₁₆ = 113₁₆ - 1 = 275₁₀ - 1 = 274₁₀
2ACE₁₆ = 2ACF₁₆ - 1 = 10959₁₀ - 1 = 10958₁₀
690₁₆ = 691₁₆ - 1 = 1681₁₀ - 1 = 1680₁₀
D306E₁₆ = D306F₁₆ - 1 = 864367₁₀ - 1 = 864366₁₀
2^9=512 различных комбинаций значений переменных
1)Ввод данных (допустим а, в, с (строго в этом порядке))
2)Сравнение а>A (Если "правда" тогда "2а" если нет "2б")
2а)Сравнение a<B (Если "правда" тогда "3" если нет "2б")
2б)Переход к пункту 2 (При этом "a" меняется на "b" и т.д.)
3) вывод данных (если есть еще числа тогда "2б", если нет тогда окончание блок схемы)
Var
a: array [1..12] of integer;
i: integer;
begin
writeln('Начальный вид массива:');
for i := 1 to 12 do
begin
a[i] := -20 + random(41);
writeln('A[', i:2, ']=', a[i]:3);
end;
writeln('Конечный вид массива:');
for i := 1 to 12 do
begin
if a[i] < 0 then a[i] := -1;
writeln('A[', i:2, ']=', a[i]:3);
end;
readln
<span>end.</span>