Oppure

Loading
09/04/10 21:24
LittleDeveloper
Postato originariamente da sub0:

Nella guida c'è un errore.

Program PrimoProgramma;
Uses Crt;
Var a,b,c:integer;

begin
    clrscr;
    write(Inserire un numero intero: );
    readln(a);
    write(Inserire un altro numero intero: );
    readln(b);
    c:=a+b; (*Somma dei numeri*)
    writeln(La soma di ,a, e ,b, è : ,c);
    readln
end.

no nn c'entra quello l'avevo già corretto

questo codice è sbagliato. quello corretto è:

Program PrimoProgramma;
Uses Crt;
Var a,b,c:integer;

begin
    clrscr;
    write('Inserire un numero intero:' );
    readln(a);
    write('Inserire un altro numero intero: ');
    readln(b);
    c:=a+b; (*Somma dei numeri*)
    writeln('La soma di ,a, e ,b, è : ',c);
    readln
end.



cioè devi inserire l'apice all'inizio e alla fine della stringa contenuta nelle parentesi del metodo write() e writeln(). in poche parole le stringhe vanno scritte fra apici ---> ' ' (quelli sotto il punto di domanda)
aaa
09/04/10 21:48
sub0
allora hai risolto? Si? Bene!! NO? Posta il codice! :hail::hail:

ps. comunque a me con questo codice:

program PrimoProgramma; 
uses Crt; 
var a,b,c:integer; 

begin 
    clrscr; 
    write('Inserire un numero intero:' ); 
    readln(a); 
    write('Inserire un altro numero intero: '); 
    readln(b); 
    c:=a+b; (*Somma dei numeri*) 
    writeln('La soma di ',a,' e ',b,' e'' : ',c);
    readln 
end.


funziona e non da errori.

allego screen.
aaa
09/04/10 21:51
sub0
allora hai risolto? Si? Bene!! NO? Posta il codice! :hail::hail:

ps. comunque a me con questo codice:

program PrimoProgramma; 
uses Crt; 
var a,b,c:integer; 

begin 
    clrscr; 
    write('Inserire un numero intero:' ); 
    readln(a); 
    write('Inserire un altro numero intero: '); 
    readln(b); 
    c:=a+b; (*Somma dei numeri*) 
    writeln('La soma di ',a,' e ',b,' e'' : ',c);
    readln 
end.


funziona e non da errori.

allego screen.
aaa
10/04/10 11:10
cassin.simone
Un consiglio: leggi, prima di iniziare, questo articolo pierotofy.it/pages/guide_tutorials/Informatica/Imparare_a_programmare/
aaa
10/04/10 12:31
Xaratroom
Se vuoi imparare a programmare devi partire da un buon libro ...
Io sconsiglierei il pascal a favore di un linguaggio c-like e OO come il java.
Questo ti consentirebbe di portare a casa una sintassi sostanzialmente "condivisa" (nei limiti) da più linguaggi e una forma mentis da "object oriented programmer".
Ultima modifica effettuata da Xaratroom 10/04/10 12:34
aaa
10/04/10 13:06
LittleDeveloper
Postato originariamente da sub0:

allora hai risolto? Si? Bene!! NO? Posta il codice! :hail::hail:

ps. comunque a me con questo codice:

program PrimoProgramma; 
uses Crt; 
var a,b,c:integer; 

begin 
    clrscr; 
    write('Inserire un numero intero:' ); 
    readln(a); 
    write('Inserire un altro numero intero: '); 
    readln(b); 
    c:=a+b; (*Somma dei numeri*) 
    writeln('La soma di ',a,' e ',b,' e'' : ',c);
    readln 
end.


funziona e non da errori.

allego screen.


No non funziona e il codice è uguale al tuo però io uso turbo pascal 7.
aaa
10/04/10 13:29
sub0
prova a modificare "uses Crt" con "uses wincrt".
aaa