№9 ФУНКЦИЯЛАР МЕН ПРОЦЕДУРАЛАР

№9 ФУНКЦИЯЛАР МЕН ПРОЦЕДУРАЛАР

1. 
   Х айнымалысына X және Y мәндерінің ең кішісін, Y айнымалысына X және Y мәндерінің ең үлкенін жазатын Minmax(X, Y ) процедурасын жаз. Процедураны 4 рет шақыру арқылы, A, B, C, D сандарының ең кіші және ең үлкен сандарын тап.
   

2. 
   A, B, C (A, B, C — біруақытта кіріс және шығыс болатын нақты параметрлер) айнымалыларының мазмұнын, мәндерін өсу реті бойынша реттейтіндей өзгертетін SortInc3(A, B, C) процедурасын жаз. Осы процедураны пайдалана отырып, үш саннан тұратын екі жиынды (A1, B1, C1) және (A2, B2, C 2) өсу реті бойынша ретте.
   

3. 
   A, B, C айнымалыларының мазмұнын, мәндерін кему реті бойынша реттейтіндей өзгертетін SortInc3(A, B, C) процедурасын жаз. Осы процедураны пайдалана отырып, үш саннан тұратын екі жиынды (A1, B1, C1) және (A2, B2, C 2) кему реті бойынша ретте.
   

4. 
   Оң жақ циклдік қозғалыс: А мәні В-ға, В мәні С-ға, С мәні А-ға өтуді орындайтын ShiftRight3(A, B, C) процедураны жаз (A, B, C — біруақытта кіріс және шығыс болатын нақты параметрлер). Осы процедура көмегімен үш саннан тұратын екі жиынның (A1, B1, C1) және (A2, B2, C2) берілгендеріне оң жақ циклдік қозғалысты орында.
   

5. 
   Сол жақ циклдік қозғалыс: С мәні В-ға, В мәні А-ға, А мәні С-ға өтуді орындайтын ShiftRight3(A, B, C) процедураны жаз (A, B, C — біруақытта кіріс және шығыс болатын нақты параметрлер). Осы процедура көмегімен үш саннан тұратын екі жиынның (A1, B1, C1) және (A2, B2, C2) берілгендеріне сол жақ циклдік қозғалысты орында.
   

6. 
   Бүтін типті Sign(X) функциясын жаз, ол X нақты саны үшін келесі мәндерді қайтарады: -1, егер X < 0; 0, егер X = 0; 1, егер X > 0.
   

7. 
   Ax² + Bx + C = 0 (A, B, C — нақты параметрлер, A≠0) квадрат теңдеу түбірлерінің санын анықтайтын бүтін типті RootsCount(A, B, C) функциясын сипатта. Осы функция көмегімен берілген коэффицеттері бар әр үш квадрат теңдеу түбірлерінің санын анықтау керек. Түбірлер санын дискриминант мәнімен анықта: D= B² -4AC.
   

8. 
   Радиусы R-ға (R — нақты) тең дөңгелектің ауданын табатын, бүтін типті CircleS(R) функциясын жаз. Осы функция көмегімен радиустары берілген үш дөңгелектің аудандарын тап. Радиусы R-ға тең дөңгелек ауданы S = πR² формуласымен есептеледі. π-дің мәні 3.14-ке тең .
   

9. 
   Ортақ центрге ие радиустары R1 және R2-ге тең шеңберлермен шектелген сақинаның ауданын табатын, бүтін типті RingS(R1, R2) функциясын жаз. Осы функция көмегімен ішкі және сыртқы радиустары берілген үш сақинаның аудандарын тап. Радиусы R-ға тең дөңгелек ауданының S = πR² формуласын қолдан. π-дің мәні 3.14-ке тең
   

10. 
    а табаны және h биіктігі (a және h — нақты) арқылы теңбүйірлі үшбұрыштың периметрін табатын, TriangleP(a,h) функциясын жаз. Осы функция арқылы табандары мен биіктіктері берілген үш теңбүйірлі үшбұрыштар периметрін тап. Үшбұрыштың b бүйір қабырғасын табу үшін Пифагор теоремасын пайдалан: b² = (a/2)² + h².