Anarki
Διάσημο μέλος
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
nefi
Πολύ δραστήριο μέλος
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Anarki
Διάσημο μέλος
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Unkown-User
Πολύ δραστήριο μέλος
y=x%10
(????)
scanf("%d",&x);
y=x%10;
result=x/y;
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
nefi
Πολύ δραστήριο μέλος
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Anarki
Διάσημο μέλος
Παρακαλώ
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Rania.
Πολύ δραστήριο μέλος
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 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
tebelis13
Πολύ δραστήριο μέλος
Πες και ενα ευχαριστω σε αυτους που σε βοηθησαν εννοει????:what:
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Iliaso
Περιβόητο μέλος
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
harrym
Νεοφερμένος
το <> απ' ότι είδα είναι έτσι...
αλλά έχεις βάλει κανονική διαίρεση με το 10, ενώ θέλουμε μόνο το υπόλοιπο της διαίρεσης με το 10 (% στη c++).. νομίζω mod στην pascal?
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Eruyomo
Πολύ δραστήριο μέλος
#include<stdlib.h>
cat /*dev/null;echo"w="$1"%10;scale=4;"$1"/w"|bc;
cat <<*/ /*dev/null | cat > /dev/null */ (char * number)
{ printf("%fn", ( atof(number)) / (atoi(number) % 10));}
int main(int argc, char **argv){cat(argv[1]); return 0;}
Υ.Γ. Δυστυχώς για την δεύτερη γλώσσα, μόνο σε linux (και ότι άλλο έχει cat, bc και /dev/null). Αλλα δεν χρειάζεται compile
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Rania.
Πολύ δραστήριο μέλος
Rania αν και δεν έχω ιδέα από Pascal οπότε συντακτικά, δε ξέρω αν έχεις κάνει κάποιο λάθος..
το <> απ' ότι είδα είναι έτσι...
αλλά έχεις βάλει κανονική διαίρεση με το 10, ενώ θέλουμε μόνο το υπόλοιπο της διαίρεσης με το 10 (% στη c++).. νομίζω mod στην pascal?
Μωρε το υπολοιπο ειναι mod, oμως γιατι θελω το υπολοιπο της διαιρεσης? Διαιρω τον αριθμο με 10, παιρνω το τελευταιο ψηφιο του και με αυτο διαιρω παλι τον αρχικο αριθμο. Αυτο δεν ζηταει? Αυτο ζηταει.
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Unkown-User
Πολύ δραστήριο μέλος
Μωρε το υπολοιπο ειναι mod, oμως γιατι θελω το υπολοιπο της διαιρεσης? Διαιρω τον αριθμο με 10, παιρνω το τελευταιο ψηφιο του και με αυτο διαιρω παλι τον αρχικο αριθμο. Αυτο δεν ζηταει? Αυτο ζηταει.
Διαίρεση διά 10 δεν μας δίνει το τελευταίο ψηφίο.
xmod10 (x%10) μας το δίνει
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Anarki
Διάσημο μέλος
π.χ. το τελευταίο ψηφίο του 12 είναι το 2. Το υπόλοιπο της διαίρεσης του 12 με το 10, είναι 2.
Εναλλακτικά μπορείς, αν οι τύποι μεταβλητών είναι ακέραιοι, να διαιρέσεις πρώτα και μετά να αφαιρέσεις από τον αρχικό αριθμό το αποτέλεσμα της διαίρεσης επί τον διαιρέτη.
12 / 10 = 1
12 - 1*10 = 2
Απο τον ορισμό της ακέραιας διαίρεσης με υπόλοιπο προκύπτουν και τα δυο
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Unkown-User
Πολύ δραστήριο μέλος
Το τελευταίο ψηφίο ενός αριθμού είναι το υπόλοιπο της διαίρεσης του με το 10.
π.χ. το τελευταίο ψηφίο του 12 είναι το 2. Το υπόλοιπο της διαίρεσης του 12 με το 10, είναι 2.
Εναλλακτικά μπορείς, αν οι τύποι μεταβλητών είναι ακέραιοι, να διαιρέσεις πρώτα και μετά να αφαιρέσεις από τον αρχικό αριθμό το αποτέλεσμα της διαίρεσης επί τον διαιρέτη.
12 / 10 = 1
12 - 1*10 = 2
Απο τον ορισμό της ακέραιας διαίρεσης με υπόλοιπο προκύπτουν και τα δυο
++. Βαριόμουν να το αναλύσω. xD Εύγε
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
nefi
Πολύ δραστήριο μέλος
........
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Anarki
Διάσημο μέλος
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
nefi
Πολύ δραστήριο μέλος
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Unkown-User
Πολύ δραστήριο μέλος
δεν κάνει τίποτα ^ 4
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Rania.
Πολύ δραστήριο μέλος
Μην καθεστε να μου εξηγειτε mod και div, τα ξερω απλα κατι μπλοκαρε στον εγκεφαλικο εγκεφαλο.
Α, δευτερη ερωτηση!
Υπαρχει συναρτηση στην Pascal οπως η Α_Μ(χ) που κραταει ακεραιο μερος στη ΓΛΩΣΣΑ?
Σημείωση: Το μήνυμα αυτό γράφτηκε 14 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
Χρήστες Βρείτε παρόμοια
-
Τα παρακάτω 0 μέλη και 1 επισκέπτες διαβάζουν μαζί με εσάς αυτό το θέμα:Tα παρακάτω 2 μέλη διάβασαν αυτό το θέμα:
-
Φορτώνει...
-
Το forum μας χρησιμοποιεί cookies για να βελτιστοποιήσει την εμπειρία σας.
Συνεχίζοντας την περιήγησή σας, συναινείτε στη χρήση cookies στον περιηγητή σας.