Programmino elementare in pascal

[kiapparo]

Salve,
ho da compilare questo programmino in pascal. siccome sto alle primissime armi.. e non riuscendo a trovare una buona guida vi posto l'esercizio, così mi date una manina per compilarlo e al limite qualche spiegazione sui vari passaggi.

Esercizio:

Assegnate le seguenti Variabili:

A, B, C, INTERE

M, Y, Z, REALI

M, N, O, CARATTERI

Eseguire le seguenti operazioni:

A diviso B

M + N

O + A

X Diviso C

Y diviso Z

Trovare il resto della divisione di A per C
Trovare il resto della divisione di B per Y

Mostrare i risultati delle operazioni e segnalare quelle eventualmente errate.

Grazie mille

[Oiziorbaf]

Originariamente inviato da kiapparo
Salve,
ho da compilare questo programmino in pascal. siccome sto alle primissime armi.. e non riuscendo a trovare una buona guida vi posto l'esercizio, così mi date una manina per compilarlo e al limite qualche spiegazione sui vari passaggi.

Esercizio:

Assegnate le seguenti Variabili:

A, B, C, INTERE

M, Y, Z, REALI

M, N, O, CARATTERI

Eseguire le seguenti operazioni:

A diviso B

M + N

O + A

X Diviso C

Y diviso Z

Trovare il resto della divisione di A per C
Trovare il resto della divisione di B per Y

Mostrare i risultati delle operazioni e segnalare quelle eventualmente errate.

Grazie mille

a div b
m+n // risultato va salvato in una stringa
o + a // il risultato va salvato in una stringa
X div C
Y/Z

se non ricordo male...visto ke il pascal lo facievamo l'anno scorso a scuola...

[kiapparo]

Originariamente inviato da Oiziorbaf
a div b
m+n // risultato va salvato in una stringa
o + a // il risultato va salvato in una stringa
X div C
Y/Z

se non ricordo male...visto ke il pascal lo facievamo l'anno scorso a scuola...

ehm...
allora se ho capito bene il programma dovrà essere di questo tipo:

PROGRAM operazioni;
VAR a,b,c: INTEGER;
m,y,z: REAL;
m,n,o: CHAR;

BEGIN
le istruzioni
...
END.

Bhè è giusto quello che ho scritto?
mi date una mano nelle istruzini?
Grazie mille

[Oiziorbaf]

se volevi ke ti scrivessi il programma lo dovevi dire subito...

program prova;
var a,b,c,ris1,ris2:integer;
    x,y,z,ris3:real;
    m,n,o:char
    ris4,ris5:string

begin

ris1:=a div b;
ris4:=m+n;
ris5:=o+a;
ris2:=x div c;
ris3:=y/x

end.

spero ke così vada bene

ciao

[kiapparo]

Originariamente inviato da Oiziorbaf
se volevi ke ti scrivessi il programma lo dovevi dire subito...

program prova;
var a,b,c,ris1,ris2:integer;
    x,y,z,ris3:real;
    m,n,o:char
    ris4,ris5:string

begin

ris1:=a div b;
ris4:=m+n;
ris5:=o+a;
ris2:=x div c;
ris3:=y/x

end.

spero ke così vada bene

ciao

Scusami.. ti ringrazio.
siccome sto alle primissime armi... perchè quando copio il codice con ctrl+v per poi riportarlo in pascal con ctrl+c non me lo copia?

come devo fare per non scrivere tutto a mano?

[Brolli]

pascal è in dos.. non funzia il ctrl+v... copia tutto in nel blocco note salvalo come .pas e aprilo con pascal...

[cso]

COPIA   ==> CTRL+Ins
INCOLLA ==> SHIFT+Ins

[Brolli]

ero rimasto alla 5.5...