http://www.greek-visions.com/t905-topic
Ξεκινάμε ένα μικρό προγραμματάκι κάνοντας πράξεις με 2 αριθμούς.
Κώδικας:
program prakseis;
uses crt;
var
ar1,ar2:integer;
apotelesma:real;
Begin
write('Δώσε τον πρώτο αριθμό:');
read(ar1);
write('Δώσε τον δεύτερο αριθμό:');
read(ar2);
apotelesma:=ar1 + ar2;
write('Μας κάνει:',apotelesma:2:2);
End.
εκεί που έχω βάλει τα εισαγωγικά βάζετε ή - ή * ή /
Παράθεση: |
apotelesma:=ar1 "+" ar2; |
ότι άλλο θέλετε γράψτε ένα σχόλιο.
Τα πνευματικά δικαιώματα αυτού του άρθρου υπόκεινται υπό την ιδιοκτησία του ιστοχώρου μας http://greekvisions.blogspot.gr και www.greek-visions.com.
Για οποιαδήποτε αναδημοσίευση παρακαλούμε να αναφέρετε ως πηγή τουλάχιστον ένα από τα δύο ιστολόγια.
0 σχόλια:
Δημοσίευση σχολίου