2-көнүгүү 1. Автобус алгачкы 9 км жолду 36 км/саат ылдам дык менен, кийинки 24 км жолду 54 км/саам ылдамдык менен жүрдү. Автобустун кыймылы нын орточо ылдамдыгы кандай? (47 км/саам.)
program evg97; uses crt; var a,b,c: real; begin writeln('++'); writeln('| порівнялка |'); writeln('++'); write('введіть число a: '); readln(a); write('введите число b: '); readln(b); write('введіть число c: '); readln(c); writeln(); writeln('++'); writeln('| результат: |'); writeln('++'); if (a=b) or (a=c) or (b=c) then writeln('| деякі (або всі) числа рівні |') else if (a< b) and (b< c) then writeln('| число посередині: b=',b: 8: 3,' |') else if (a< c) and (c< b) then writeln('| число посередині: c=',c: 8: 3,' |') else writeln('| число посередині: a=',a: 8: 3,' |'); writeln('++'); end.
Большинство природных углеводов обладает оптической активностью вращать плоскость поляризации проходящего через них луча света на тот или иной угол вправо (по часовой стрелке) или влево (против часовой стрелки) . Так удельное вращение d-глюкозы [a]D20 =52,5o, удельное вращение d-фруктозы [a]D20 = -93o, удельное вращение сахарозы +66,5о. При вычислении удельного вращения учитываются температура и концентрация раствора, длина волны применявшегося света и т. п. Благодаря этому удельное вращение представляет совершенно определенную характерную для данного вещества физическую константу, служащую для идентифицирования вещества и для суждения о степени его чистоты. Особенное значение удельное вращение имеет для углеводов, так как для них нехарактерны многие другие свойства, такие как температуры плавления и кипения, вследствие того что они не перегоняются без разложения даже в высоком вакууме углеводов вращать плоскость поляризации используется для количественного определения их в растворе при поляриметра. Поляриметрическое определение сахара широко применяется в свеклосахарном производст
program evg97; uses crt; var a,b,c: real; begin writeln('++'); writeln('| порівнялка |'); writeln('++'); write('введіть число a: '); readln(a); write('введите число b: '); readln(b); write('введіть число c: '); readln(c); writeln(); writeln('++'); writeln('| результат: |'); writeln('++'); if (a=b) or (a=c) or (b=c) then writeln('| деякі (або всі) числа рівні |') else if (a< b) and (b< c) then writeln('| число посередині: b=',b: 8: 3,' |') else if (a< c) and (c< b) then writeln('| число посередині: c=',c: 8: 3,' |') else writeln('| число посередині: a=',a: 8: 3,' |'); writeln('++'); end.