var
a,P:integer;
begin
writeln('Введите периметр равнобедренного треугольника: ');
read(P);
writeln('Введите основание равнобедренного треугольника: ');
read(a);
writeln('Боковая сторона равнобедренного треугольника: ',(P-a)/2);
<span>end.</span>
Информационная система<span> — </span>система<span> обработки информации и </span><span>соответствующие организационные ресурсы</span><span>, которые обеспечивают и распространяют </span>информацию.
примеры
<span>Информационная система по отысканию рыночных ниш
</span><span>Информационные системы, ускоряющие потоки товаров.
</span><span>Информационные системы по снижению издержек производства
</span><span>Информационные системы автоматизации технологии
</span>
Исходный массив:
1 2 3 4 5 6 7 8 9 10 11
Далее, каждому элементу начиная с нулевого, присваиваем значение массива с таким же индексом, но считая с конца и получаем:
11 10 9 8 7 6 7 8 9 10 11
Объяснение:
2+2=4 - истина
2+9=8 - ложь
Витебск - город - истина
Беларусь - федерация - ложь
if i>l then write(a) - условное выражение - истина
Begin и end - не обезательные команды - ложь
У паука 8 лап - истина
У черепахи 6 лап - ложь
Наполеон Бонапартр - император французов - истина
Христофо Колумб - японец - ложь
А.С. Пушкин - великий пиватель - истина
Фёдор Достоевский - американский писатель - ложь
Думаю, понятно, да? Просто тусклый свет и тырыпыры.