Rania.
Πολύ δραστήριο μέλος
Η Rania. αυτή τη στιγμή δεν είναι συνδεδεμένη. Είναι 31 ετών και επαγγέλεται Άνεργος/η. Έχει γράψει 1,778 μηνύματα.
14-01-10
00:53
.
Απαξιω για ολα εκτος απο το (2). Νιωθω σαν να μου μιλας κινεζικα.
Απαξιω για ολα εκτος απο το (2). Νιωθω σαν να μου μιλας κινεζικα.
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Rania.
Πολύ δραστήριο μέλος
Η Rania. αυτή τη στιγμή δεν είναι συνδεδεμένη. Είναι 31 ετών και επαγγέλεται Άνεργος/η. Έχει γράψει 1,778 μηνύματα.
14-01-10
00:02
Γεια σας. Μετα απο λιγο διαβασμα C, αποφασισα να γραψω το πρωτο μου προγραμμα.
Βεβαια μεχρι το κεφαλαιο που εχω διαβασει δεν μου ξεκαθαριζει με ποια εντολη τερματιζω τελικα ενα προγραμμα. Σε κατι παραδειγματα εβαζε exit(0) παντως, οποτε. :p
Φυσικα προκειται για ενα υψιστης σημασια προγραμμα που θα διευκολυνει την ανθρωπινη ζωη.
Και εχει και νιουλαην!
(για καποιο λογο δεν μου βγαζει την καθετο στο \n μεσα στα κοουντ ταγκζ, εβαλα τελεια αντ'αυτου.)
Code:
#include <stdio.h>
main()
{
int a, b;
float mo;
printf("δωσε δυο αριθμους.n");
scanf(" %d %d ", &a &b);
mo=(a+b)/2.0;
If (mo>=10)
printf("μεσος ορος μεγαλυτερος απο το δεκα: %d.n",mo);
else
printf("μεσος ορος μικροτερος απο το δεκα: %d.n", mo);
}
exit(0);
Φυσικα προκειται για ενα υψιστης σημασια προγραμμα που θα διευκολυνει την ανθρωπινη ζωη.
Και εχει και νιουλαην!
(για καποιο λογο δεν μου βγαζει την καθετο στο \n μεσα στα κοουντ ταγκζ, εβαλα τελεια αντ'αυτου.)
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Rania.
Πολύ δραστήριο μέλος
Η Rania. αυτή τη στιγμή δεν είναι συνδεδεμένη. Είναι 31 ετών και επαγγέλεται Άνεργος/η. Έχει γράψει 1,778 μηνύματα.
17-11-09
15:04
Rania αν και δεν έχω ιδέα από Pascal οπότε συντακτικά, δε ξέρω αν έχεις κάνει κάποιο λάθος..
το <> απ' ότι είδα είναι έτσι...
αλλά έχεις βάλει κανονική διαίρεση με το 10, ενώ θέλουμε μόνο το υπόλοιπο της διαίρεσης με το 10 (% στη c++).. νομίζω mod στην pascal?
Μωρε το υπολοιπο ειναι mod, oμως γιατι θελω το υπολοιπο της διαιρεσης? Διαιρω τον αριθμο με 10, παιρνω το τελευταιο ψηφιο του και με αυτο διαιρω παλι τον αρχικο αριθμο. Αυτο δεν ζηταει? Αυτο ζηταει.
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Rania.
Πολύ δραστήριο μέλος
Η Rania. αυτή τη στιγμή δεν είναι συνδεδεμένη. Είναι 31 ετών και επαγγέλεται Άνεργος/η. Έχει γράψει 1,778 μηνύματα.
17-11-09
11:43
Ειναι οφ τοπικ αυτο το ποστ. Μην το διαγραψετε, ανοιχτε το σποιλερ οσοι θετε, απλα για να μην εκανα ξεχωριστο θρεντ..
Το αντιστοιχο προγραμμα (με τον ακεραιο και τη διαιρεση με το τελευταιο ψηφιο)σε Pascal θα ηταν ετσι;
Code:
Program askisi;
Var a, b: integer;
c:real;
Begin
Writeln ('Δωσε εναν ακεραιο αριθμο');
Read(a);
b:=a/10;
If (b<>0) then {*δεν ειμαι σιγουρη αν το διαφορο ειναι <> και στην Pascal*}
Begin
c:=a/b;
Writeln('η διαιρεση του αριθμου με το τελευταιο ψηφιο του ειναι: ', c);
End
else
Begin
Writeln('Αδυνατη διαιρεση');
End;
End.
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.