1)Ввод данных (допустим а, в, с (строго в этом порядке))
2)Сравнение а>A (Если "правда" тогда "2а" если нет "2б")
2а)Сравнение a<B (Если "правда" тогда "3" если нет "2б")
2б)Переход к пункту 2 (При этом "a" меняется на "b" и т.д.)
3) вывод данных (если есть еще числа тогда "2б", если нет тогда окончание блок схемы)
<span>1 символ в кодировке Виндовс-1251 = 1 байт.
1536 симв.*1 байт/симв. = 1536 байт.
1536 / 1024 = 1,5кБайт.
</span>
Если требовалось сделать таблицу истинности, вот. Если нужно что-то другое, то пиши в комментарии, я доделаю.
begin
var (N, a, x1, x2) := (12, 1.0, 2.0, 3.0);
PartitionPoints(x1, x2, N).
Tabulate(x -> Sin(Sqrt(a ** 3 + x)) / (14 + a * x)).
ForEach(p -> Writeln(p[0]:17:14, p[1]:20:16));
end.