Ав+вд+де+еф=12 - кратчайший путь
Под третьим поколением (3GL) первоначально понимались все языки более
высокого уровня, чем ассемблер. Главной отличительной чертой языков
третьего поколения стала независимость от аппаратного обеспечения,
то есть выражение алгоритма в форме, не зависящей от конкретных
характеристик машины, на которой он будет исполняться. Код, написанный
на языке третьего поколения, перед исполнением транслируется либо
непосредственно в машинные команды, либо в код на ассемблере и затем уже
ассемблируется. При компиляции, в отличие от предыдущих поколений, уже
нет соответствия один-к-одному между инструкциями программы и
генерируемым кодом.
Стала широко использоваться интерпретация
программ — при этом инструкции программы не преобразуются в машинный
код, а исполняются непосредственно одна за другой. Независимость от
«железа» достигается за счёт использования интерпретатора,
скомпилированного под конкретную аппаратную платформу. Одним из ранних
интерпретируемых языков стал Лисп.
<em>// PascalABC.NET 3.3, сборка 1547 от 07.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ReadlnString('Введите строку символов:').ToCharArray;
// Теперь у нас есть исходный массив символов, а для работы нужна строка!
a:=a.JoinIntoString('').RegexReplace('\([^\(\)]+\)','').ToArray;
a.Println
end.
<u>Пример</u>
Введите строку символов: 2+3(4+1)+2(x-1)(x-2)+a
2+3+2+a
Const
n=10;
var
a,b,c:array[1..n] of real;
i:integer;
begin
Writeln('Введите элементы массива');
for i:=1 to n do Read(a[i]);
Writeln(' A B C');
for i:=1 to n do
begin
b[i]:=a[n-i+1]; c[i]:=(a[i]+b[i])/2;
Writeln(a[i]:7:3,b[i]:7:3,c[i]:7:3)
end
end.
<em><u>Тестовое решение:</u></em>
Введите элементы массива
1.26 -0.3 6.18 7 -7.04 -9.9 -1.7 -2.955 1.75 0.245
A B C
1.260 0.245 0.753
-0.300 1.750 0.725
6.180 -2.955 1.613
7.000 -1.700 2.650
-7.040 -9.900 -8.470
-9.900 -7.040 -8.470
-1.700 7.000 2.650
-2.955 6.180 1.613
1.750 -0.300 0.725
0.245 1.260 0.753
<em><u>Блок-схема во вложении</u></em><em><u /></em>
ЯП для блок-схемы не так уж и важен. Я в них не силен, но держите)