• Downloads
  • ! Read Me !
  • Μαθήματα
  • Φοιτητικά
  • Τεχνικά Θέματα
  • Συζητήσεις
  • Happy Hour!
  • About THMMY.gr
 V  < 
Search:  
Welcome, Guest. Please login or register.
June 17, 2025, 12:29:31 pm

Login with username, password and session length
Links
  Thmmy.gr portal
   Forum
   Downloads
   Ενεργ. Λογαριασμού
   Επικοινωνία
  
  Χρήσιμα links
   Σελίδα τμήματος
   Βιβλιοθήκη Τμήματος
   Elearning
   Φοιτητικά fora
   Πρόγραμμα Λέσχης
   Πρακτική Άσκηση
   Ηλεκτρονική Εξυπηρέτηση Φοιτητών
   Διανομή Συγγραμμάτων
   Ψηφιακό Καταθετήριο Διπλωματικών
   Πληροφορίες Καθηγητών
   Instagram @thmmy.gr
   mTHMMY
  
  Φοιτητικές Ομάδες
   ACM
   Aristurtle
   ART
   ASAT
   BEAM
   BEST Thessaloniki
   EESTEC LC Thessaloniki
   EΜΒ Auth
   IAESTE Thessaloniki
   IEEE φοιτητικό παράρτημα ΑΠΘ
   SpaceDot
   VROOM
   Panther
  
Πίνακας Ελέγχου
Welcome, Guest. Please login or register.
June 17, 2025, 12:29:31 pm

Login with username, password and session length

Αναζήτηση

Google

THMMY.gr Web
Πρόσφατα
Αποτελέσματα Εξεταστικής ...
by george14
[Today at 12:08:25]

[ΨEE] Γενικές απορίες και...
by Juror8
[Today at 12:06:57]

Ισραήλ - Ιράν: Πόλεμος στ...
by okan
[Today at 02:33:21]

Τι ακούτε αυτήν τη στιγμή...
by Katarameno
[Today at 02:29:21]

[Οργάνωση Υπολογιστών] Γε...
by RAFI
[June 16, 2025, 22:46:54 pm]

[Σ.Π.Η.Ε.] Γενικές απορίε...
by Nikos_313
[June 16, 2025, 19:49:00 pm]

[ΘΤΠΑ] Γενικές απορίες κα...
by Nikos_313
[June 16, 2025, 16:56:56 pm]

[Εφ.Θερμοδυναμική] Γενικέ...
by Λαμπτήρας
[June 16, 2025, 15:55:08 pm]

[Αρχές Οικονομίας] Να επι...
by _Trob
[June 16, 2025, 13:28:21 pm]

[Σ.Α.Π.Γ.] Εργασία 2025
by Nikos_313
[June 16, 2025, 12:13:45 pm]

Πρακτική Άσκηση ΤΗΜΜΥ 201...
by George_RT
[June 16, 2025, 10:22:18 am]

[Διανεμημένη Παραγωγή] Γε...
by Διάλεξις
[June 16, 2025, 01:56:37 am]

Αντικατάστασης πυκνωτή σε...
by nmpampal
[June 15, 2025, 16:25:56 pm]

[Σ.Π.Η.Ε.] Παλιά θέματα -...
by nmpampal
[June 15, 2025, 06:43:15 am]

Το thmmy.gr στο instagram...
by Mr Watson
[June 15, 2025, 00:50:23 am]

[Λογισμός ΙΙ] Απορίες σε...
by el mariachi
[June 14, 2025, 20:47:07 pm]

ΠΡΟΣΟΧΗ στο ανέβασμα θεμά...
by tzortzis
[June 14, 2025, 16:54:08 pm]

Ρυθμίσεις Θεμάτων της Ανώ...
by el mariachi
[June 14, 2025, 11:56:45 am]

Πότε θα βγει το μάθημα; -...
by Nikos_313
[June 14, 2025, 10:00:55 am]

Αρχείο Ανακοινώσεων [Arch...
by Nikos_313
[June 14, 2025, 09:58:14 am]
Στατιστικά
Members
Total Members: 9961
Latest: Poli
Stats
Total Posts: 1426686
Total Topics: 31710
Online Today: 169
Online Ever: 2093
(April 17, 2025, 08:47:49 am)
Users Online
Users: 62
Guests: 91
Total: 153
acolak
Filpan10
vas22
kap
programmer2004
ppoug
tzortzis
agapi
Yamal
TheBadSalesman
Emilios
Vassoula
Solon
mpaltzak
Nikos_313
idchatzi
pliroforikarios
athena_apo
stavros0201
kostas1507
Isidora
eplysia
witchingHour
hevidis3524
Ioannis Apostolikas
mrotskos
nataliakara
_iliaskaz_
makato
hacky
dimitire
rafail zisiadis
Xris
chrisdardas
jimalexoud
antontsiorvas
tasos gourd
Saint_GR
kvas
Limpolits
ioannisfa
vaggelis.ntokas
athichatz
alexkont
odkoutrolikos
Fenia04
apapathe
Gaspard
gp6
marf10
manolitsis
george14
Nekt
mmikelo
Alikhts
JoHn!
Εμφάνιση

Νέα για πρωτοετείς
Είσαι πρωτοετής;... Καλώς ήρθες! Μπορείς να βρεις πληροφορίες εδώ. Βοήθεια για τους καινούργιους μέσω χάρτη.
Κατεβάστε εδώ το Android Application για εύκολη πρόσβαση στο forum.
Ανεβάζετε τα θέματα των εξετάσεων στον τομέα Downloads με προσοχή στα ονόματα των αρχείων!

Νέα!
Για ανανέωση (ή προσθήκη νέου) avatar, πρέπει η μεγαλύτερη διάσταση της εικόνας να είναι 110 pixels.
THMMY.gr > Forum > Μαθήματα Βασικού Κύκλου > 1ο Εξάμηνο > Δομημένος Προγραμματισμός (Moderators: Tasos Bot, tzortzis, Nekt) > [Δομημένος Προγραμματισμός] Εργασία Β 2008
0 Members and 1 Guest are viewing this topic.
Pages: 1 ... 7 8 [9] Go Down Print
Author Topic: [Δομημένος Προγραμματισμός] Εργασία Β 2008  (Read 18433 times)
adianohtos
Εθισμένος στο ΤΗΜΜΥ.gr
*****
Gender: Male
Posts: 869


κουτσουρακι...!


View Profile
Re: [Δομημένος Προγραμματισμός] Εργασία Β 2008
« Reply #120 on: April 16, 2008, 20:32:43 pm »

Δεν νομιζω να φταιει αυτο, το διορθωσα και παλι το ιδιο μου βγαζει   Sad  help!!!

 beg
« Last Edit: April 16, 2008, 20:54:36 pm by adianohtos » Logged

ΠΑΟΚ -για να μην ξεχνιομαστε-
^^DaRk_HunTeR
Μόνιμος κάτοικος ΤΗΜΜΥ.gr
******
Gender: Male
Posts: 2149


0001 0010 0100 0010


View Profile
Re: [Δομημένος Προγραμματισμός] Εργασία Β 2008
« Reply #121 on: April 16, 2008, 21:52:43 pm »

Quote from: adianohtos on April 16, 2008, 19:59:42 pm

Code:
    d=e=k=z=D[0]=0
    for(i=0;i<=n;i++){
        for(j=0;j<=m;j++){
            if(a[i]==b[j]){
            over[k]=a[i];
            k++;
            d=1;
            }
            else{
                for(q=0;q<=z;q++){
                if(D[z]!=b[j]){
                D[z]=b[j];
                z++;
                }   
            }   
           }
        }
        if(d=0){
            C[e]=a[i];
            e++;
            d=0;
        }   
    }
 
Εκτος απο τα λογικα λα8η που δεν ειναι λιγα,εχεις λα8η και στη συνταξη του προγραμματος...

Για παραδειγμα βαζεις στο 3ο λουπ εως z, ναι ομως ποσο ειναι το z οεο??(αν ειναι μηδεν που απο οτι φαινεται τοσο ειναι δεν εχει νοημα το φορ  που ουτως η αλλως και να ετρεχε ως καποιο σημειο θα γεμιζε τον πινακα με λα8ος στοιχεια...)

Περα απο αυτα τα απλα...
αυτο το κομματι ειναι λα8ος ολο μετα την ευρεση του οβερ...
Θα σου προτεινω,γιατι η αναλυση απο το φορουμ ειναι εν γενει δυσκολη,να κοιταξεις το αντιστοιχο κομματι του κωδικα μου και αν δεν το καταλαβεις προσπα8ησε να ξαναγραψεις με αλλον τροπο μονο το συγκεκριμενο...

Κατα τα αλλα το υπολοιπο προγραμμα(που δεν εχω κοουταρει) σωστο μου φαινεται
Logged

Without order nothing can exist without chaos nothing can evolve

Timeo hominem unius libri
The minstrel
adianohtos
Εθισμένος στο ΤΗΜΜΥ.gr
*****
Gender: Male
Posts: 869


κουτσουρακι...!


View Profile
Re: [Δομημένος Προγραμματισμός] Εργασία Β 2008
« Reply #122 on: April 16, 2008, 22:04:25 pm »

Το Ζ ξεκιναει 0 και καθε φορα που μπαινει μεσα στη for αυξανεται κατα ενα. Τεσπα, εμενα μου βγαζει προβλημα σε πολλες for και συγκεκριμενα βγαζει statement missing. Ας πουμε αναφερεται στην πρωτη for του κοματιου που εχεις στο post σου!!!
Τη δικια σου την εχω δει τα min απο σενα τα ψιλοπηρα βαριομουν να τα κανω!  Tongue Στα αλλα επιγκεντρωθηκα..
« Last Edit: April 16, 2008, 22:08:12 pm by adianohtos » Logged

ΠΑΟΚ -για να μην ξεχνιομαστε-
demP
Ανερχόμενος/Ανερχόμενη
**
Posts: 80


View Profile
Re: [Δομημένος Προγραμματισμός] Εργασία Β 2008
« Reply #123 on: April 16, 2008, 22:05:55 pm »

Για το θεμα "Πως θα περιορισω τον χρηστη να μην δωσει απο 50 τιμες....

@ stefos
@ Wanderer
σας ευχαριστω πολυ προσπαθω να το ενσωματωσω στο δικο μου  Smiley

Βλέπω πολλους να βαζουν break στον έλεγχο των  πινακων για τον over.
 
Code:
for (i=0; i<n; i++)
   {
      for (j=0; j<m; j++)
     {

     if (a[i]==b[j])

{over[k]=a[i];       
k++;
break;
}
     }
   }

H break εδω, ετσι όπως το βλέπω εγώ, δεν αποσκοπει καπου.
Αφου έτσι κι αλλιώς με τις δυο for θα ελεγχθουν όλα τα στοιχεια
των πινακων, θα γινει ο οver και μετα θα φυγει απο το loops,

Δεν θα κερδισουμε χρονο απο καπου έτσι δεν ειναι?
Logged
fourier
Guest
Re: [Δομημένος Προγραμματισμός] Εργασία Β 2008
« Reply #124 on: April 16, 2008, 22:16:51 pm »

Η διορια ληγει σε λιγες ωρες, οποτε ανεβαζω την εργασια μου, οπως την εστειλα πριν λιγο:

Code:
#include <stdio.h>
#include <math.h>

int main(void){

int i, j, k, n, m, mini, minj;
float A[50], B[50], OVER[50], A_NEW[50], B_NEW[50];
float mindiff, temp;


/* 8ETOUME WS DEFAULT THN TIMH MHDEN GIA OLA TA KELIA TWN PINAKWN. STH SYNEXEIA 8A DWSOUME
TIMES DIAFORES TOU MHDEN SE OSA KELIA 8ELOUME */


for (i=0; i<50; i++) {
A[i]=0;
B[i]=0;
A_NEW[i]=0;
B_NEW[i]=0;
OVER[i]=0;
}


/* AKOLOU8EI H EISAGWGH TWN SYXNOTHTWN KAI H ANTIKATASTASH TWN MHDENIKWN.
H ANTIKATASTASH STAMATAEI MOLIS DW8EI GIA PRWTH FORA MHDENIKH SYXNOTHTA,
OPOTE OLES OI EPOMENES PARAMENOUN MHDENIKES */

printf("\nSyxnothtes radiofwnikou sta8mou A: \n");
n=0;
for (i=1; i<=50; i++) {
printf("Eisagete thn %dh syxnothta tou A sta8mou: ",i);
scanf("%f",&A[i-1]);
if (A[i-1]==0) {
break;
}
n++;
}

printf("\nSyxnothtes radiofwnikou sta8mou B: \n");
m=0;
for (j=1; j<=50; j++) {
printf("Eisagete thn %dh syxnothta tou B sta8mou: ",j);
scanf("%f",&B[j-1]);
if (B[j-1]==0) {
break;
}
m++;
}
printf("\nO sta8mos A kate8ese %d syxnothtes.",n);
printf("\nO sta8mos B kate8ese %d syxnothtes.",m);


/* AKOLOU8EI H SYGKRISH TWN PINAKWN, H ANTIGRAFH TWN KOINWN SYXNOTHTWN STON PINAKA "OVER"
KAI H EKTYPWSH TOU. */

for (i=0; i<50; i++) {
for (j=0; j<50; j++) {
if (A[i]==B[j]) {
OVER[i]=A[i];
}
}
}

printf("\n\nOi koines syxnothtes twn dyo sta8mwn einai:\n");
for (k=0; k<50; k++) {
if(OVER[k]!=0) {
printf("  %4.1f  |",OVER[k]);
}
}

/* DINOUME STOUS PINAKES "A_NEW" KAI "B_NEW" TIS IDIES TIMES ME TOUS "A" KAI "B" ANTISTOIXA */

for (i=0; i<50; i++) {
A_NEW[i]=A[i];
B_NEW[i]=B[i];
}


/* H SYGKRISH TWN PINAKWN EPANALAMBANETAI, AFTH TH FORA OMWS ANTISTROFA:
OI PINAKES "A" KAI "B" SYGKRINONTAI ME TON "OVER", O OPOIOS PERIEXEI TIS KOINES SYXNOTHTES.
KA8E FORA POU ENTOPIZETAI KOINH TIMH METAKSY "A" KAI "OVER", MHDENIZOUME THN ANTISTOIXH
STON "A_NEW", KAI OMOIWS GIA TON "B" KAI TON "B_NEW" */

for (i=0; i<50; i++) {
for (k=0; k<50; k++) {
if (A[i]==OVER[k]) {
A_NEW[i]=0;
}
}
}

for (j=0; j<50; j++) {
for (k=0; k<50; k++) {
if (B[j]==OVER[k]) {
B_NEW[j]=0;
}
}
}


/* AKOLOU8EI H EKTYPWSH TWN TELIKWN PINAKWN.
H DIAMORFWSH TOU PROGRAMMATOS GINETAI ETSI WSTE SE OLES TIS PERIPTWSEIS NA
EKTYPWNONTAI MONO OI MH MHDENIKES SYXNOTHTES. */


printf("\n\nOi telikes syxnothtes tou sta8mou A, xwris tis koines, einai: \n");
for (i=0; i<50; i++) {
if (A_NEW[i]!=0) {
printf("  %4.1f  |",A_NEW[i]);
}
}
printf("\nOi telikes syxnothtes tou sta8mou B, xwris tis koines, einai: \n");
for (j=0; j<50; j++) {
if (B_NEW[j]!=0) {
printf("  %4.1f  |",B_NEW[j]);
}
}
 

/* AKOLOU8EI H SYGKRISH TWN NEWN SYXNOTHTWN GIA NA BRE8OUN AFTES, H APOLYTH TIMH
THS DIAFORAS TWN OPOIWN EINAI H MIKROTERH DYNATH.
8ETOUME ARXIKA WS ELAXISTH KAT' APOLYTH TIMH DIAFORA TON ARI8MO 999999, 8EWRWNTAS PWS EINAI ARKETA
MEGALOS WSTE NA MHN DHMHIOURGH8EI PROBLHMA STH SYGKRISH,,
KAI META TH SYGKRINOUME ME OLES TIS PI8ANES AFAIRESEIS. */

mindiff=999999;
mini=0;
minj=0;

for (i=0; i<50; i++) {
for (j=0; j<50; j++) {
if (A_NEW[i]!=0 && B_NEW[j]!=0) {
temp=fabs(A_NEW[i]-B_NEW[j]);
if (temp<mindiff) {
mindiff=temp;
mini=i;
minj=j;
}
}
}
}

printf("\n\nH elaxisth kat' apolyth timh diafora meta3y syxnothtwn twn dyo sta8mwn einai: %4.2f",mindiff);
printf("\nkai emfanizetai gia tis syxnothtes: fA = %4.1f kai fB = %4.1f\n\n",A_NEW[mini],B_NEW[minj]);

printf("\nTelos programmatos!\n\n");

return 0;
}
Logged
Emfanever
Καταστραμμένος
********
Gender: Male
Posts: 5284


Πολίτης


View Profile
Re: [Δομημένος Προγραμματισμός] Εργασία Β 2008
« Reply #125 on: April 16, 2008, 22:36:52 pm »

Quote from: adianohtos on April 16, 2008, 19:37:14 pm
Παιδια στο compile βγαζει σχεδον σε ολες τις loop μου error "statment missing" και σε καποια αλλα σημεια warnings "code has no effect" !! Κυριως οσον αναφορα το 1ο ξερει κανεις τι μπορει να εννοει??

Αυτό το error το βγάζει ως συνήθως όταν ξεχνάς το ερωτηματικό ; ή κανένα άγκιστρο {  .Βεβαιώσου ότι τα έχεις σωστά.
Logged
^^DaRk_HunTeR
Μόνιμος κάτοικος ΤΗΜΜΥ.gr
******
Gender: Male
Posts: 2149


0001 0010 0100 0010


View Profile
Re: [Δομημένος Προγραμματισμός] Εργασία Β 2008
« Reply #126 on: April 16, 2008, 22:43:40 pm »

@adianohtos
ρε φιλε τι κα8ομαστε και λεμε τοση ωρα....

βαλε κανα ερωτηματικο σε κανα printf Tongue
που να τρεξει ετσι το προγραμμα

Τεσπα την παλευω και γω... utr
Logged

Without order nothing can exist without chaos nothing can evolve

Timeo hominem unius libri
The minstrel
portinos
Καταξιωμένος/Καταξιωμένη
***
Posts: 264



View Profile
Re: [Δομημένος Προγραμματισμός] Εργασία Β 2008
« Reply #127 on: April 16, 2008, 22:49:17 pm »

Τελείωσα. Την έστειλα  wav. Πάντως μια βόλτα στην παραλία σε φυσήξει το αεράκι είναι ο καλύτερος τρόπος να ξεκαθαρίσει το κεφάλι σου. Πήγα το απόγευμα και τώρα που γύρισα τα κατάφερα με τη πρώτη να την κάνω να τρέξει σωστά
Logged
^^DaRk_HunTeR
Μόνιμος κάτοικος ΤΗΜΜΥ.gr
******
Gender: Male
Posts: 2149


0001 0010 0100 0010


View Profile
Re: [Δομημένος Προγραμματισμός] Εργασία Β 2008
« Reply #128 on: April 16, 2008, 22:49:30 pm »

Code:
#include <stdio.h>
#include <stdlib.h>

int main(){
    int m,n,i,j,k,d,q,z,e,x;
    float a[50],b[50],C[50],D[50],over[50],min,mina,minb;
   
    printf("dwse to n\n");
    scanf("%f",&n);
    printf("dwse to m\n");
    scanf("%f",&m);
   
    for(i=0;i<n;i++){
     printf("katethese ti syxnotita tou stathmou A\n");
     scanf("%f",&a[i]);
    }
    for(i=0;i<m;i++){
      printf("katethese ti syxnotita tou stathmou B\n");
      scanf("%f",&b[i]);
    }   

    d=e=k=z=0;
    for(i=0;i<n;i++){
        for(j=0;j<m;j++){
           
            if(a[i]==b[j]){
            over[k]=a[i];
            k++;
            d=1;}
  }
         }
    for(i=0;i<k;i++){
for(j=0;j<m;j++){
             
              if(over[i]!=b[j]){
                D[z]=b[j];
                z++;}
         }   
               
             
               
        if(d=0){
            C[e]=a[i];
            e++;
            d=0;}
       
    }
    printf("Oi koines syxnotites einai:\n");
    for(i=0;i<k;i++){
        printf("%f\n",over[i]);
        }
    printf("O neow pinakas tou stathmou A\n");
    for(i=0;i<e;i++){
        printf("%f\n",C[i]);
        }
    printf("O neos pinakas tou stathmou B\n");
    for(i=0;i<z;i++){
        printf("%f\n",D[i]);
        }
       
    min=abs(C[0]-D[0]);
    mina=C[0];
    minb=D[0];
    for(i=0;i<e;i++){
        for(j=0;j<z;j++){
            if(abs(C[i]-D[j])<min){
                min=abs(C[i]-D[j]);
                mina=C[i];
                minb=D[j];
            }
        }
    }
    printf("Oi syxnotites twn stathmwn A kai B gia tis opoies i diafora |fa-fb| einai i elaxisti einai oi antistoixes times: %f",mina);
    printf("kai %f",minb);
    scanf("%d",&x);
}

@adianohtos
Τρεχει...
εβαλα τα ερωτηματικα που ελειπαν και τις αγκυλες...
αλλα οπως σ πα δεν εχει νοημα...
απο εδω και περα προσπα8ησε να αλλαξεις τη λογικη σε εκεινο το κομματι...
*αφου ετρεξε εισαι σε καλο δρομο Tongue
Logged

Without order nothing can exist without chaos nothing can evolve

Timeo hominem unius libri
The minstrel
adianohtos
Εθισμένος στο ΤΗΜΜΥ.gr
*****
Gender: Male
Posts: 869


κουτσουρακι...!


View Profile
Re: [Δομημένος Προγραμματισμός] Εργασία Β 2008
« Reply #129 on: April 16, 2008, 23:19:51 pm »

Ωραιος, ευχαριστω, θα το παλεψω οσο μπορω γιατι εχω θολωσει λιγο  Cheesy
Logged

ΠΑΟΚ -για να μην ξεχνιομαστε-
Emfanever
Καταστραμμένος
********
Gender: Male
Posts: 5284


Πολίτης


View Profile
Re: [Δομημένος Προγραμματισμός] Εργασία Β 2008
« Reply #130 on: April 17, 2008, 00:22:30 am »

έληξε η προθεσμία......
να δούμε τι μας επιφυλάσσει η καινούργια...! Cheesy Cheesy Cheesy
Logged
AgentCain
Αbsolute ΤΗΜΜΥ.gr
*******
Gender: Male
Posts: 3587


Σοφράνο βρίσε, σταβέντο φτύσε!


View Profile
Re: [Δομημένος Προγραμματισμός] Εργασία Β 2008
« Reply #131 on: April 17, 2008, 20:07:56 pm »

Quote from: Emfanever on April 17, 2008, 00:22:30 am
έληξε η προθεσμία......
να δούμε τι μας επιφυλάσσει η καινούργια...! Cheesy Cheesy Cheesy

ΣΥΝΑΡΤΗΣΕΙΣ !!!  Hello
Logged


Ανάμεσα σ'αυτό που σκέφτομαι, σ'αυτό που θέλω να σας πω, σ'αυτό που πιστεύω ότι σας λέω, σ'αυτό που σας λέω, σ'αυτό που θέλετε να ακούσετε, σ'αυτό που ακούτε, σ'αυτό που πιστεύετε ότι καταλαβαίνετε, σ'αυτό που θέλετε να καταλάβετε και σ'αυτό που καταλαβαίνετε υπάρχουν τουλάχιστον 9 πιθανότητες να μην συννενοηθούμε.

vasso
Καταστραμμένος
********
Gender: Female
Posts: 6672


Overambitious doer


View Profile WWW
Re: [Δομημένος Προγραμματισμός] Εργασία Β 2008
« Reply #132 on: April 25, 2008, 23:08:22 pm »

ανεβάζω κι εγώ μια εργασία, όπως την έφτιαξα πριν από λίγο (ξέρω, άργησα κάπως, κάλλιο αργά.. Tongue )

Code:
#include <stdio.h>
#include <stdlib.h>


int main()
{
    int i,j,m=500,n=500,k,t=0;
    float A1[50]={},B1[50]={},over[50]={},diafora[50],diaforaA[50],diaforaB[50],dif,difmin=500;
   
    //diavazw ta m kai n mikrotera toy 50
    printf("eisagete m kai n:\n");
    while(m>51 ||m<0 ||n>51 || n<0)   
       scanf("%d%d",&m,&n);
   
   
    //gemizw tous pinakes
    printf("eisagete tis suxnotites toy A:\n");
    for(i=0;i<m;i++)
        scanf("%f",&A1[i]);
     
    printf("eisagete tis suxnotites toy B:\n");
    for(i=0;i<n;i++)
        scanf("%f",&B1[i]);
   
    //elegxw an to stoixeio tou A uparxei idi ston over. An nai, proxwraw sto epomeno
    //elegxw gia kathe stoixeio tou A an uparxei ston B kai an nai to grafoume ston over
    for(i=0;i<m;i++)
    {
        for(k=0;k<t;k++)
        {
            if(A1[i]!=over[k])
              continue;
            else
            {
              i++;
              break;
            }   
        }
             
        for(j=0;j<n;j++)
        {
            if(A1[i]==B1[j])
            {
                over[t]=A1[i];
                t++;
                break;
            }
         }
    } 
    //typwnw ton over
    printf("o pinakas over:\n");
    for(i=0;i<t;i++)
      printf("%.2f\n",over[i]);
     
    //afairw apo tous A kai B tis koines suxnotites
    for(i=0;i<m;i++)
        for(k=0;k<t;k++)
            if(A1[i]==over[k])
               A1[i]=0;
               
    for(j=0;j<n;j++)
        for(k=0;k<t;k++)
           if(B1[j]==over[k])
               B1[j]=0;
               
    //typwnw toys kainoyrioys A kai B
    printf("o neos pinakas A:\n");
    for(i=0;i<m;i++)
      if(A1[i])
         printf("%.2f\n",A1[i]);
    printf("o neos pinakas B:\n");
    for(j=0;j<n;j++)
      if(B1[j])
         printf("%.2f\n",B1[j]);
         
     
     //gemizw ton pinaka diafora me tin elaxisti diafora tou ka8e stoixeiou tou A apo ta stoixeia tou B kai apo8ikeyw ta dio stoixeia twn opoiwn pairnw ti diafora se dio kainourious pinakes
     //initializing
      for(i=0;i<50;i++)
        diafora[i]=500;
     k=0;
     //main
     for(i=0;i<m;i++)
     {
         if(A1[i])
         {
             for(j=0;j<n;j++)
             {
                 if(B1[j])
                 {
                     dif=(A1[i]-B1[j])>0?(A1[i]-B1[j]):(B1[j]-A1[i]);
                     if(dif<diafora[k])
                     {
                       diafora[k]=dif;
                       diaforaA[k]=A1[i];
                       diaforaB[k]=B1[j];
                      }   
                 }
             }
            k++;
           }
       }
       
       //vriskw to pio mikro stoixeio tou pinaka diafora
       for(i=0;i<50;i++)
          if(diafora[i]<difmin)
          {
              difmin=diafora[i];
              t=i;               
          }
        printf("h elaxisti diafora einai: %.2f\n", diafora[t]);
        printf("to Fa einai %.2f.\n", diaforaA[t]);
        printf("to Fb einai %.2f.\n", diaforaB[t]);
       
   
    system("pause");
}   

στον dev δουλεύει τέλεια, η μόνη περίπτωση που γκρινιάζει είναι όταν η συχνότητα που θέλει ο σταθμός είναι 0. Τότε, καλά να πάθει. Tongue

Logged

Είναι τα βλέφαρά μου
διάφανες αυλαίες.
Όταν τα ανοίγω βλέπω
μπρος μου ό,τι κι αν τύχει.
Όταν τα κλείνω βλέπω
μπρος μου ό,τι ποθώ.
Pages: 1 ... 7 8 [9] Go Up Print
Jump to:  

Powered by SMF | SMF © 2006-2009, Simple Machines LLC
Scribbles2 | TinyPortal © Bloc | XHTML | CSS
Loading...