Есть неудобные древние римские цифры, их нужно перевести в современные индийские цифры, которые почему-то называются арабскими.
берется строка типа:
LXIV и посимвольно (иногда по двусимвольно идет справа налево) и переводит в обычные нам цифры. IV - переводит в 4. Потом X переводит в 10, потом L переводит в 50. Складывает полученное, получается 64. Перевели. Т.к. строка с латинской цифрой большая и не известно сколько там символов(LXIV тут 4), то берется цикл по переменной длине строки. Цикл пройдет все символы строки( 4 их или 10), в цикле будет N количество итераций, столько сколько знаков в латинской цифре.
1. Неожиданная резкая боль, страх, нервные потрясения. Они могут вызвать мгновенное снижение артериального давления, вследствие чего наступает снижение кровотока, нарушение кровоснабжения головного мозга, что приводит к обмороку.
2.Общая слабость организма, иногда усугубляемая нервным истощением. Общая слабость организма, возникающая вследствие самых разных причин, начиная от голода, плохого питания и кончая постоянным волнением, может также привести к снижению артериального давления и обмороку.
3.Пребывание в помещении с недостаточным количеством кислорода. Уровень кислорода может быть понижен из-за нахождения в помещении большого количества людей, плохой вентиляции и загрязнения воздуха табачным дымом. Вследствие этого мозг получает меньше кислорода, чем нужно, и у пострадавшего наступает обморок.
4.Длительное пребывание в положении стоя без движения. Это приводит к застою крови в области ног, уменьшению ее поступления в мозг и, как следствие, - к обмороку.
Есть неудобные древние римские цифры, их нужно перевести в современные индийские цифры, которые почему-то называются арабскими.
берется строка типа:
LXIV и посимвольно (иногда по двусимвольно идет справа налево) и переводит в обычные нам цифры. IV - переводит в 4. Потом X переводит в 10, потом L переводит в 50. Складывает полученное, получается 64. Перевели. Т.к. строка с латинской цифрой большая и не известно сколько там символов(LXIV тут 4), то берется цикл по переменной длине строки. Цикл пройдет все символы строки( 4 их или 10), в цикле будет N количество итераций, столько сколько знаков в латинской цифре.
Цикл это вот это:
while(true) do
begin
repeat
***тут идет итерация цикла***
until ((number >= 1) and (number <= 3999));