Var
S, a, h: real;
begin
write('Введите длину основания --->');read(a);
write('Введите высоту --->');read(h);
S := (a * h) / 2;
writeln('Площадь треугольника равна', ' ', S);
writeln('Целая часть - ', Trunc(S));
writeln('Дробная часть - ', Frac(S));
end.
<em>Д</em><em>о</em><em>р</em><em>о</em><em>г</em><em>о</em><em>й</em><em> </em><em> </em><em>п</em><em>о</em><em>л</em><em>ь</em><em>з</em><em>о</em><em>в</em><em>а</em><em>т</em><em>е</em><em>л</em><em>ь</em><em>,</em><em> </em><em>я</em><em> </em><em>п</em><em>р</em><em>о</em><em>в</em><em>е</em><em>р</em><em>и</em><em>л</em><em> </em><em><u>в</u></em><em><u>с</u></em><em><u>е</u></em><em> </em><em>с</em><em>п</em><em>о</em><em>с</em><em>о</em><em>б</em><em>ы</em><em> </em><em>и</em><em> </em><em>н</em><em>е</em><em> </em><em>н</em><em>а</em><em>ш</em><em>е</em><em>л</em><em> </em><em>т</em><em>а</em><em>к</em><em>у</em><em>ю</em><em> </em><em>с</em><em>т</em><em>е</em><em>п</em><em>е</em><em>н</em><em>ь</em><em>.</em>
<em>П</em><em>о</em><em>ж</em><em>а</em><em>л</em><em>у</em><em>й</em><em>с</em><em>т</em><em>а</em><em> </em><em>п</em><em>р</em><em>о</em><em>в</em><em>е</em><em>р</em><em>ь</em><em> </em><em>(</em><em>-</em><em>т</em><em>е</em><em>)</em><em> </em><em>с</em><em>в</em><em>о</em><em>е</em><em> </em><em>у</em><em>с</em><em>л</em><em>о</em><em>в</em><em>и</em><em>е</em><em> </em><em>(</em><em>п</em><em>р</em><em>а</em><em>в</em><em>и</em><em>л</em><em>ь</em><em>н</em><em>о</em><em>-</em><em>л</em><em>и</em><em> </em><em>о</em><em>н</em><em>о</em><em> </em><em>н</em><em>а</em><em>п</em><em>и</em><em>с</em><em>а</em><em>н</em><em>о</em><em>)</em>
<em>И</em><em> </em><em>е</em><em>с</em><em>л</em><em>и</em><em> </em><em>о</em><em>к</em><em>а</em><em>ж</em><em>е</em><em>т</em><em>с</em><em>я</em><em> </em><u>о</u><u>ш</u><u>и</u><u>б</u><u>к</u><u>а</u><em> </em><em>в</em><em> </em><em>у</em><em>с</em><em>л</em><em>о</em><em>в</em><em>и</em><em>и</em><em>,</em><em> </em><em>т</em><em>о</em><em> </em><em>н</em><em>а</em><em>п</em><em>и</em><em>ш</em><em>и</em><em> </em><em>(</em><em>-</em><em>т</em><em>е</em><em>)</em><em> </em><em>в</em><em> </em><em>к</em><em>о</em><em>м</em><em>м</em><em>е</em><em>н</em><em>т</em><em>а</em><em>р</em><em>и</em><em>я</em><em>х</em>
На быстродействие влияет только в том случае, когда для работы операционной системе(ОС) и её программного обеспечения(ПО) не хватает оперативной памяти(ОЗУ). В других случаях не влияет, пока не достигнут предел памяти используемого ПО.
1шаг алгоритма.
а) <span>записывается исходная цепочка символов, после нее записывается исходная цепочка символов в обратном порядке
КОМ+МОК = КОММОК
б) </span><span>затем записывается буква, следующая в русском алфавите за той буквой, которая в исходной цепочке стояла на последнем месте
(за буквой М в русском алфавите следует буква Н)
КОММОК+Н = </span>КОММОКН<span>
2 шаг алгоритма.
</span>а) записывается исходная цепочка символов, после нее записывается исходная цепочка символов в обратном порядке
КОММОКН+НКОММОК = КОММОКННКОММОК
б) затем записывается буква, следующая в русском алфавите за той буквой, которая в исходной цепочке стояла на последнем месте
(за буквой Н в русском алфавите следует буква О)
КОММОКННКОММОК+О = КОММОКННКОММОКО
Ответ: количество букв О в полученной последовательности = 5
Естественно неправильно, посмотри формулу круга для начала, сразу все понятно будет ;)
*намек на степени*
