Să se scrie un program care citeşte de la tastatură un număr natural cu exact trei cifre și determină suma cifrelor sale.
Va rog frumos in Pascal
Răspunsuri la întrebare
Răspuns de
0
var a,sum : integer;
Begin
read(a);
sum:=(a div 100)+(a div 10 mod 10)+ (a mod 10);
write(sum);
End.
Begin
read(a);
sum:=(a div 100)+(a div 10 mod 10)+ (a mod 10);
write(sum);
End.
Alte întrebări interesante
Alte limbi străine,
8 ani în urmă
Geografie,
8 ani în urmă
Matematică,
8 ani în urmă
Matematică,
8 ani în urmă
Biologie,
9 ani în urmă
Limba română,
9 ani în urmă
Limba română,
9 ani în urmă