fork download
  1. #include <stdio.h>
  2. #include <string.h>
  3.  
  4. // Fungsi untuk menentukan fenotipe
  5. char* fenotipe(char geno[3]) {
  6. if (geno[0] == 'A' || geno[1] == 'A') {
  7. return "Dominan";
  8. } else {
  9. return "Resesif";
  10. }
  11. }
  12.  
  13. int main() {
  14. char induk1[3], induk2[3];
  15. char f1[4][3]; // Menyimpan kombinasi F1 maksimal 4
  16. int i, j;
  17.  
  18. printf("Masukkan genotipe induk 1 (contoh: Aa): ");
  19. scanf("%2s", induk1);
  20. printf("Masukkan genotipe induk 2 (contoh: Aa): ");
  21. scanf("%2s", induk2);
  22.  
  23. // Membuat kombinasi F1 (4 kemungkinan)
  24. int index = 0;
  25. for (i = 0; i < 2; i++) {
  26. for (j = 0; j < 2; j++) {
  27. f1[index][0] = induk1[i];
  28. f1[index][1] = induk2[j];
  29. f1[index][2] = '\0';
  30. // Urutkan huruf agar AA, Aa, aa konsisten
  31. if (f1[index][0] > f1[index][1]) {
  32. char temp = f1[index][0];
  33. f1[index][0] = f1[index][1];
  34. f1[index][1] = temp;
  35. }
  36. index++;
  37. }
  38. }
  39.  
  40. // Hitung frekuensi genotipe
  41. int countAA=0, countAa=0, countaa=0;
  42. for (i = 0; i < 4; i++) {
  43. if (strcmp(f1[i], "AA") == 0) countAA++;
  44. else if (strcmp(f1[i], "Aa") == 0) countAa++;
  45. else if (strcmp(f1[i], "aA") == 0) countAa++; // jika Aa tertukar
  46. else if (strcmp(f1[i], "aa") == 0) countaa++;
  47. }
  48.  
  49. printf("\nPersentase Genotipe F1:\n");
  50. printf("AA: %.2f%%\n", countAA * 25.0);
  51. printf("Aa: %.2f%%\n", countAa * 25.0);
  52. printf("aa: %.2f%%\n", countaa * 25.0);
  53.  
  54. // Hitung fenotipe
  55. int countDominan = countAA + countAa;
  56. int countResesif = countaa;
  57.  
  58. printf("\nPersentase Fenotipe F1:\n");
  59. printf("Dominan: %.2f%%\n", countDominan * 25.0);
  60. printf("Resesif: %.2f%%\n", countResesif * 25.0);
  61.  
  62. return 0;
  63. }
  64.  
Success #stdin #stdout 0s 5288KB
stdin
2 2
0 0
0 0
stdout
Masukkan genotipe induk 1 (contoh: Aa): Masukkan genotipe induk 2 (contoh: Aa): 
Persentase Genotipe F1:
AA: 0.00%
Aa: 0.00%
aa: 0.00%

Persentase Fenotipe F1:
Dominan: 0.00%
Resesif: 0.00%