#include <stdio.h>
#include <stdlib.h>
#include <locale.h>
void grup(int ,char );
void turler_listele(char ,char );
void el_cagir();
int menu(){
char cikis;
int menu;
printf("\n ANA MENU\n");
printf("1. Tum Periyodik Tabloyu Listele\n");
printf("2. Gruplarina Gore Listele\n");
printf("3. Turlerine Gore Listele\n");
printf("4. Atom Numarasina Gore Cagir\n");
printf("5. CiKiS\n");
do{
printf("Lutfen Seciminizi giriniz:\n");
scanf("%d",&menu);
}while(menu<1 || menu>5);
int sayi;
char harf,A,B;
char tur,deger;
switch(menu){
case 1:
Tum_Liste();
break;
case 2:
grup(sayi,harf);
break;
case 3:
turler_listele(tur,deger);
break;
case 4:
el_cagir();
break;
case 5:
exit(1);
}
}
int main()
{
setlocale(LC_ALL,"Turkish");
menu();
return 0;
}
void Tum_Liste(){
int dizi;
printf("AMETALLER" "\n"
"1 H Hidrojen 1A" "\n"
"6 C Karbon 4A" "\n"
"7 N Azot 5A" "\n"
"8 O Oksijen 6A" "\n"
"15 P Fosfor 5A" "\n"
"16 S Kükürt 6A" "\n"
"34 Se Selenyum 6A" "\n"
"METALLER" "\n"
"3 Li Lityum 1A" "\n"
"11 Na Sodyum 1A""\n"
"12 Mg Magnezyum 2A""\n"
"13 Al Alüminyum 3A""\n"
"14 Si Silisyum 4A""\n"
"19 K Potasyum 1A""\n"
"20 Ca Kalsiyum 2A""\n"
"31 Ga Galyum 3A""\n"
"32 Ge Germanyum 4A""\n"
"33 As Arsenik 5A""\n"
"37 Rb Rubidyum 1A""\n"
"38 Sr Stronsiyum 2A""\n"
"49 In Ýndiyum 3A""\n"
"50 Sn Kalay 4A""\n"
"51 Sb Antimon 5A""\n"
"52 Te Tellür 6A""\n"
"55 Cs Sezyum 1A""\n"
"56 Ba Baryum 2A""\n"
"81 Tl Talyum 3A""\n"
"82 Pb Kurþun 4A""\n"
"83 Bi Bizmut 5A""\n"
"84 Po Polonyum 6A""\n"
"87 Fr Fransiyum 1A""\n"
"88 Ra Radyum 2A""\n"
"\n""GECiS METALLERi""\n"
"21 Sc Skandiyum 3B""\n"
"22 Ti Titanyum 4B""\n"
"23 V Vanadyum 5B""\n"
"24 Cr Krom 6B""\n"
"25 Mn Mangan 7B""\n"
"26 Fe Demir 8B""\n"
"27 Co Kobalt 8B""\n"
"28 Ni Nikel 8B""\n"
"29 Cu Bakýr 1B""\n"
"30 Zn Çinko 2B""\n"
"39 Y Ýtriyum 3B""\n"
"40 Zr Zirkonyum 4B""\n"
"41 Nb Niobyum 5B""\n"
"42 Mo Molibden 6B""\n"
"43 Tc Teknesyum 7B""\n"
"44 Ru Rutenyum 8B""\n"
"45 Rh Rodyum 8B""\n"
"46 Pd Paladyum 8B""\n"
"47 Ag Gümüþ 1B""\n"
"48 Cd Kadmiyum 2B""\n"
"72 Hf Hafniyum 4B""\n"
"73 Ta Tantal 5B""\n"
"74 W Volfram 6B""\n"
"75 Re Renyum 7B""\n"
"76 Os Osmiyum 8B""\n"
"77 Ir Ýridyum 8B""\n"
"78 Pt Platin 8B""\n"
"79 Au Altýn 1B""\n"
"80 Hg Cýva 2B""\n"
"104 Rf Rutherfordiyum 4B""\n"
"105 Db Dubniyum 5B""\n"
"106 Sg Seaborgiyum 6B""\n"
"107 Bh Bohriyum 7B""\n"
"108 Hs Hassiyum 8B""\n"
"112 Cn Kopernikyum 2B""\n"
"\n""HALOJENLER""\n"
"9 F Flor 7A""\n"
"17 Cl Klor 7A""\n"
"35 Br Brom 7A""\n"
"53 I Ýyot 7A""\n"
"85 At Astatin 7A""\n"
"\n""SOYGAZLAR""\n"
"2 He Helyum 8A""\n"
"10 Ne Neon 8A""\n"
"18 Ar Argon 8A""\n"
"36 Kr Kripton 8A""\n"
"54 Xe Ksenon 8A""\n"
"86 Rn Radon 8A""\n"
"\n""LANTANiTLER""\n"
"57 La Lantan 3B""\n"
"58 Ce Seryum 4B""\n"
"59 Pr Praseodim 5B""\n"
"60 Nd Neodimyum 6B""\n"
"61 Pm Prometyum 7B""\n"
"62 Sm Samaryum 8B""\n"
"63 Eu Evropiyum 8B""\n"
"64 Gd Gadolinyum 8B""\n"
"65 Tb Terbiyum 1B""\n"
"66 Dy Disprozyum 2B""\n"
"67 Ho Holmiyum 3A""\n"
"68 Er Erbiyum 4A""\n"
"69 Tm Tulyum 5A""\n"
"70 Yb Ýterbiyum 6A""\n"
"71 Lu Lutetyum 7A""\n"
"\n""AKTiNiTLER""\n"
"89 Ac Aktinyum 3B""\n"
"90 Th Toryum 4B""\n"
"91 Pa Protaktinyum 5B""\n"
"92 U Uranyum 6B""\n"
"93 Np Neptünyum 7B""\n"
"94 Pu Plütonyum 8B""\n"
"95 Am Amerikyum 8B""\n"
"96 Cm Küriyum 8B""\n"
"97 Bk Berkelyum 1B""\n"
"98 Cf Kaliforniyum 2B""\n"
"99 Es Aynþtaynyum 3A""\n"
"100 Fm Fermiyum 4A""\n"
"101 Md Mendelevyum 5A""\n"
"102 No Nobelyum 6A""\n"
"103 Lr Lavrensiyum 7A""\n"
"\n""BiLiNMEYENLER""\n"
"109 Mt Meitneriyum ""\n"
"110 Ds Darmstadtiyum""\n"
"111 Rg Röntgenyum ""\n"
"113 Uut Ununtriyum""\n"
"114 Fl Flerovyum""\n"
"115 Uup Ununpentiyum""\n"
"116 Lv Livermoryum""\n"
"117 Uus Ununseptiyum""\n"
"118 Uuo Ununoktiyum""\n");
return menu();
}
void grup(int sayi,char harf){
char A,B,a,b;
printf("listelenecek grup numarasini giriniz");
scanf("%d",&sayi);
printf("harfini girin:");
scanf("%s",&harf);
if(sayi==1 && (harf=='A'||harf=='a')){
printf("19 K Potasyum ""\n"
"3 Li Lityum 1A""\n"
"11 Na Sodyum 1A""\n"
"37 Rb Rubidyum 1A""\n"
"55 Cs Sezyum 1A""\n"
"87 Fr Fransiyum 1A""\n");
}
if(sayi==1 && (harf=='B'||harf=='b')){
printf("29 Cu Bakýr 1B""\n"
"47 Ag Gümüþ 1B""\n"
"79 Au Altýn 1B""\n"
"65 Tb Terbiyum 1B""\n"
"97 Bk Berkelyum 1B""\n"
);
}
if(sayi==2 &&(harf=='A'||harf=='a')){
printf("12 Mg Magnezyum 2A""\n"
"20 Ca Kalsiyum 2A""\n"
"38 Sr Stronsiyum 2A""\n"
"56 Ba Baryum 2A""\n"
"88 Ra Radyum 2A""\n" );
}
if(sayi==2 && (harf=='B'||harf=='b') ){
printf("30 Zn Çinko 2B""\n"
"48 Cd Kadmiyum 2B""\n"
"80 Hg Cýva 2B""\n"
"112 Cn Kopernikyum 2B""\n"
"66 Dy Disprozyum 2B""\n"
"98 Cf Kaliforniyum 2B""\n" );
}
if(sayi==3 && (harf=='A'||harf=='a')){
printf("13 Al Alüminyum 3A""\n"
"31 Ga Galyum 3A""\n"
"49 In Ýndiyum 3A""\n"
"81 Tl Talyum 3A""\n"
"67 Ho Holmiyum 3A""\n"
"99 Es Aynþtaynyum 3A""\n" );
}
if(sayi==3 && (harf=='B'||harf=='b')){
printf("21 Sc Skandiyum 3B""\n"
"39 Y Ýtriyum 3B""\n"
"57 La Lantan 3B""\n"
"89 Ac Aktinyum 3B""\n");
}
if(sayi==4 && (harf=='A'||harf=='a')){
printf("6 C Karbon 4A""\n"
"14 Si Silisyum 4A""\n"
"32 Ge Germanyum 4A""\n"
"50 Sn Kalay 4A""\n"
"82 Pb Kurþun 4A""\n"
"68 Er Erbiyum 4A""\n"
"100 Fm Fermiyum 4A""\n" );
}
if(sayi==4 && (harf=='B'||harf=='b')){
printf("22 Ti Titanyum 4B""\n"
"40 Zr Zirkonyum 4B""\n"
"72 Hf Hafniyum 4B""\n"
"104 Rf Rutherfordiyum 4B""\n"
"58 Ce Seryum 4B""\n"
"90 Th Toryum 4B""\n" );
}
if(sayi==5 && (harf=='A'||harf=='a')){
printf("7 N Azot 5A""\n"
"15 P Fosfor 5A""\n"
"33 As Arsenik 5A""\n"
"51 Sb Antimon 5A""\n"
"83 Bi Bizmut 5A""\n"
"69 Tm Tulyum 5A""\n"
"101 Md Mendelevyum 5A""\n");
}
if(sayi==5 && (harf=='B'||harf=='b')){
printf("23 V Vanadyum 5B""\n"
"41 Nb Niobyum 5B\n"
"73 Ta Tantal 5B""\n"
"105 Db Dubniyum 5B""\n"
"59 Pr Praseodim 5B""\n"
"91 Pa Protaktinyum 5B""\n");
}
if(sayi==6 && (harf=='A'||harf=='a')){
printf("8 O Oksijen 6A""\n"
"16 S Kükürt 6A""\n"
"34 Se Selenyum 6A""\n"
"52 Te Tellür 6A""\n"
"84 Po Polonyum 6A""\n"
"70 Yb Ýterbiyum 6A""\n"
"102 No Nobelyum 6A""\n");
}
if(sayi==6 && (harf=='B'||harf=='b')){
printf("24 Cr Krom 6B""\n"
"42 Mo Molibden 6B""\n"
"74 W Volfram 6B""\n"
"106 Sg Seaborgiyum 6B""\n"
"60 Nd Neodimyum 6B""\n"
"92 U Uranyum 6B""\n");
}
if(sayi==7 && (harf=='A'||harf=='a')){
printf("9 F Flor 7A""\n"
"17 Cl Klor 7A""\n"
"35 Br Brom 7A""\n"
"53 I Ýyot 7A""\n"
"85 At Astatin 7A""\n"
"103 Lr Lavrensiyum 7A""\n"
"71 Lu Lutetyum 7A""\n");
}
if(sayi==7 && (harf=='B'||harf=='b')){
printf("25 Mn Mangan 7B""\n"
"43 Tc Teknesyum 7B""\n"
"75 Re Renyum 7B""\n"
"107 Bh Bohriyum 7B""\n"
"61 Pm Prometyum 7B""\n"
"93 Np Neptünyum 7B""\n");
}
if(sayi==8 && (harf=='A'||harf=='a')){
printf("2 He Helyum 8A""\n"
"10 Ne Neon 8A""\n"
"18 Ar Argon 8A""\n"
"36 Kr Kripton 8A""\n"
"54 Xe Ksenon 8A""\n"
"86 Rn Radon 8A""\n");
}
if(sayi==8 && (harf=='B'||harf=='b')){
printf("26 Fe Demir 8B""\n"
"27 Co Kobalt 8B""\n"
"28 Ni Nikel 8B""\n"
"44 Ru Rutenyum 8B""\n"
"45 Rh Rodyum 8B""\n"
"46 Pd Paladyum 8B""\n"
"76 Os Osmiyum 8B""\n"
"77 Ir Ýridyum 8B""\n"
"78 Pt Platin 8B""\n"
"108 Hs Hassiyum 8B""\n"
"62 Sm Samaryum 8B""\n"
"95 Am Amerikyum 8B""\n"
"63 Eu Evropiyum 8B""\n"
"64 Gd Gadolinyum 8B""\n"
"94 Pu Plütonyum 8B""\n"
"96 Cm Küriyum 8B""\n");
}
else{
printf("girdiginiz gurup bulunmamaktadir");
return menu();
}
}
void turler_listele(char tur,char deger){
char a,A,s,S,m,M,h,H,k,K,l,L,b,B;
printf("metal icin m girin.""\n"
"ametal icin a girin.""\n"
"soygazlar icin s girin.""\n"
"halojenler icin h girin.""\n"
"aktinitler icin k girin.""\n"
"lantanitler icin l girin.""\n"
"bilinmeyenler icin b girin.""\n");
printf("\nlistelenecek turu giriniz:");
scanf("%s",&tur);
if(tur=='a'|| tur=='A'){
printf("1 H Hidrojen 1A""\n"
"6 C Karbon 4A""\n"
"7 N Azot 5A""\n"
"8 O Oksijen 6A""\n"
"15 P Fosfor 5A""\n"
"16 S Kükürt 6A""\n"
"34 Se Selenyum 6A""\n");
}
if (tur=='m'|| tur=='M'){
printf("3 Li Lityum 1A""\n"
"11 Na Sodyum 1A""\n"
"12 Mg Magnezyum 2A""\n"
"13 Al Alüminyum 3A""\n"
"14 Si Silisyum 4A""\n"
"19 K Potasyum 1A""\n"
"20 Ca Kalsiyum 2A""\n"
"31 Ga Galyum 3A""\n"
"32 Ge Germanyum 4A""\n"
"33 As Arsenik 5A""\n"
"37 Rb Rubidyum 1A""\n"
"38 Sr Stronsiyum 2A""\n"
"49 In İndiyum 3A""\n"
"50 Sn Kalay 4A""\n"
"51 Sb Antimon 5A""\n"
"52 Te Tellür 6A""\n"
"55 Cs Sezyum 1A""\n"
"56 Ba Baryum 2A""\n"
"81 Tl Talyum 3A""\n"
"82 Pb Kurşun 4A""\n"
"83 Bi Bizmut 5A""\n"
"84 Po Polonyum 6A""\n"
"87 Fr Fransiyum 1A""\n"
"88 Ra Radyum 2A""\n");
}
if(tur=='s'|| tur=='S'){
printf("2 He Helyum 8A""\n"
"10 Ne Neon 8A""\n"
"18 Ar Argon 8A""\n"
"36 Kr Kripton 8A""\n"
"54 Xe Ksenon 8A""\n"
"86 Rn Radon 8A""\n");
}
if(tur=='h'|| tur=='H'){
printf("9 F Flor 7A""\n"
"17 Cl Klor 7A""\n"
"35 Br Brom 7A""\n"
"53 I İyot 7A""\n"
"85 At Astatin 7A""\n");
}
if(tur=='l'|| tur=='L'){
printf("57 La Lantan 3B""\n"
"58 Ce Seryum 4B""\n"
"59 Pr Praseodim 5B""\n"
"60 Nd Neodimyum 6B""\n"
"61 Pm Prometyum 7B""\n"
"62 Sm Samaryum 8B""\n"
"63 Eu Evropiyum 8B""\n"
"64 Gd Gadolinyum 8B""\n"
"65 Tb Terbiyum 1B""\n"
"66 Dy Disprozyum 2B""\n"
"67 Ho Holmiyum 3A""\n"
"68 Er Erbiyum 4A""\n"
"69 Tm Tulyum 5A""\n"
"70 Yb İterbiyum 6A""\n"
"71 Lu Lutetyum 7A""\n");
}
if(tur=='k'|| tur=='K'){
printf("89 Ac Aktinyum 3B""\n"
"90 Th Toryum 4B""\n"
"91 Pa Protaktinyum 5B""\n"
"92 U Uranyum 6B""\n"
"93 Np Neptünyum 7B""\n"
"94 Pu Plütonyum 8B""\n"
"95 Am Amerikyum 8B""\n"
"96 Cm Küriyum 8B""\n"
"97 Bk Berkelyum 1B""\n"
"98 Cf Kaliforniyum 2B""\n"
"99 Es Aynştaynyum 3A""\n"
"100 Fm Fermiyum 4A""\n"
"101 Md Mendelevyum 5A""\n"
"102 No Nobelyum 6A""\n"
"103 Lr Lavrensiyum 7A""\n");
}
if(tur=='b'|| tur=='B'){
printf("109 Mt Meitneriyum""\n"
"110 Ds Darmstadtiyum""\n"
"111 Rg Röntgenyum""\n"
"113 Uut Ununtriyum""\n"
"114 Fl Flerovyum""\n"
"115 Uup Ununpentiyum""\n"
"116 Lv Livermoryum""\n"
"117 Uus Ununseptiyum""\n"
"118 Uuo Ununoktiyum""\n");
}
else{
printf("girdiginiz tur bulunmamaktadir.");
return menu();
}
}
void el_cagir(){
int no;
char *element[150]={" H Hidrojen",
" He Helyum",
" Li Lityum",
" Be Berilyum",
" B Bor",
" C Karbon",
" N Azot",
" O Oksijen",
" F Flor",
" Ne Neon",
" Na Sodyum",
" Mg Magnezyum",
" Al Alüminyum",
" Si Silisyum",
" P Fosfor",
" S Kükürt",
" Cl Klor",
" Ar Argon",
" K Potasyum",
" Ca Kalsiyum",
" Sc Skandiyum",
" Ti Titanyum",
" V Vanadyum",
" Cr Krom",
" Mn Mangan",
" Fe Demir",
" Co Kobalt",
" Ni Nikel",
" Cu Bakır",
" Zn Çinko",
" Ga Galyum",
" Ge Germanyum",
" As Arsenik",
" Se Selenyum",
" Br Brom",
" Kr Kripton",
" Rb Rubidyum",
" Sr Stronsiyum",
" Y İtriyum",
" Zr Zirkonyum",
" Nb Niobyum",
" Mo Molibden",
" Tc Teknesyum",
" Ru Rutenyum",
" Rh Rodyum",
" Pd Paladyum",
" Ag Gümüş",
" Cd Kadmiyum",
" In İndiyum",
" Sn Kalay",
" Sb Antimon",
" Te Tellür",
" I İyot",
" Xe Ksenon",
" Cs Sezyum",
" Ba Baryum",
" La Lantan",
" Ce Seryum",
" Pr Praseodim",
" Nd Neodimyum",
" Pm Prometyum",
" Sm Samaryum",
" Eu Evropiyum",
" Gd Gadolinyum",
" Tb Terbiyum",
" Dy Disprozyum",
" Ho Holmiyum",
" Er Erbiyum",
" Tm Tulyum",
" Yb İterbiyum",
" Lu Lutetyum",
" Hf Hafniyum",
" Ta Tantal",
" W Volfram",
" Re Renyum",
" Os Osmiyum",
" Ir İridyum",
" Pt Platin",
" Au Altın",
" Hg Cıva",
" Tl Talyum",
" Pb Kurşun",
" Bi Bizmut",
" Po Polonyum",
" At Astatin",
" Rn Radon",
" Fr Fransiyum",
" Ra Radyum",
" Ac Aktinyum",
" Th Toryum",
" Pa Protaktinyum",
" U Uranyum",
" Np Neptünyum",
" Pu Plütonyum",
" Am Amerikyum",
" Cm Küriyum",
" Bk Berkelyum",
" Cf Kaliforniyum",
" Es Aynştaynyum",
" Fm Fermiyum",
" Md Mendelevyum",
" No Nobelyum",
" Lr Lavrensiyum",
" Rf Rutherfordiyum",
" Db Dubniyum",
" Sg Seaborgiyum",
" Bh Bohriyum",
" Hs Hassiyum",
" Mt Meitneriyum",
" Ds Darmstadtiyum",
" Uuu Ununnilyum",
" Uub Ununbiyum",
" Uut Ununtriyum",
" Uuq Ununkuadyum",
" Uup Ununpentiyum",
" Uuh Ununheksiyum",
" Uus Ununseptiyum",
" Uuo Ununoktiyum",
" Uue Ununenniyum",
" Ubn Unbiniliyum"};
printf("elementin atom no giriniz:");
scanf("%d",&no);
printf("element:");
printf(element[no-1]);
return menu();
}
Programınızın bir kısmını(çok küçük bir kısmını) kendi programıma örnek aldım. Çok teşekkürler. İsminizi programın sonuna koyacağım. Hakkınızı helal edin.
YanıtlaSil