Advertisement
MikiStrail

Лаб рекурзија

Dec 14th, 2018
102
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.62 KB | None | 0 0
  1. 1. Производ од цифри
  2. #include <stdio.h>
  3. int proizvod(int broj>{
  4. if(broj==0) return 1;
  5. else return (broj/10)%10 * proizvod(broj/100);
  6. }
  7. int main(){
  8. int broj;
  9. scanf("%d",&broj);
  10. printf("%d",proizvod(broj));
  11. }
  12.  
  13. 2. Форма
  14. #include <stdio.h>
  15.  
  16. void edinici (int n)
  17. {
  18. int i;
  19. for(i=0;i<n;i++)
  20. printf("1");
  21. }
  22.  
  23. int main()
  24. {
  25. int n,i;
  26. scanf("%d", &n);
  27. for(i=0;i<n;i++)
  28. {
  29. edinici(i);
  30. printf("%d", i+1);
  31. edinici(i);
  32. printf("\n");
  33. }
  34. return 0;
  35. }
  36.  
  37. 3. Палиндром
  38. #include <stdio.h>
  39.  
  40.  
  41. int obraten (int broj)
  42. {
  43. int osnova=1;
  44. while (broj/(osnova*10)) {
  45. osnova=osnova*10;
  46. }
  47. if(broj<10)
  48. return broj;
  49. return (broj%10)*osnova+obraten(broj/10);
  50. }
  51.  
  52. int palindrom(int broj)
  53. {
  54. int n=obraten(broj);
  55. if (n==broj)
  56. return 1;
  57. else
  58. return 0;
  59.  
  60. }
  61.  
  62. int main()
  63. {
  64. int n,novbroj;
  65. scanf("%d", &n);
  66. novbroj=n+obraten(n);
  67. if(palindrom(novbroj))
  68. printf("E palindrom");
  69. else
  70. printf("Ne e palindrom");
  71. return 0;
  72. }
  73. 4. НЗС
  74. #include <stdio.h>
  75. #define MAX 100
  76. int nzs(int a[], int n, int broj)
  77. {
  78. int proverka=1, i;
  79. for(i=0;i<n;i++)
  80. {
  81. if(broj%a[i]!=0)
  82. {
  83. proverka=0;
  84. break;
  85. }
  86. }
  87. if(proverka)
  88. return broj
  89. return nzs(a, n, broj+1);
  90. }
  91. int main()
  92. {
  93. int a[MAX],n,i;
  94. scanf("%d", &n);
  95. for(i=0;i<n;i++)
  96. scanf("%d",&a[i]);
  97. int najgolem=a[0];
  98. for(i=1;i<n;i++) {
  99. if(a[i]>najgolem)
  100. najgolem=a[i];
  101. }
  102. int broj=nzs(a,n,najgolem);
  103. printf("NZS na elementite na ovaa niza e %d", broj);
  104. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement