Pentru un număr natural dat din k cifre (k=>5) sa se calculeze suma cifrelor de pe poziții pare si produsul cifrelor de pe poziții impare, adunate cu unu. (În pascal și în c++ va rog mult,mulțumesc)
Răspunsuri la întrebare
Răspuns de
1
#include <iostream>
#include <cmath>
using namespace std;
int main(){
int n,n0,nr=0,i,cifra,s=0,p=1;
cout<<"Introduceti numarul: ";
cin>>n;
n0=n;
while(n0>0){
n0=n0/10;
nr++;
}
for(i=nr-1;i>=0;i--){
cifra=n/(int)pow(10,i);
if((nr-i)%2==0){
s+=cifra;
}
else{
p*=cifra+1;
}
n=n%(int)pow(10,i);
}
cout<<"Suma cifrelor pare este: "<<s<<endl;
cout<<"Produsul cifrlor impare adunate cu unu este: "<<p;
return 0;
}
Program Tema;
var n,n0,nr,i,cifra,s,p:integer;
Begin
s:=0;
p:=1;
writeln('Introduceti numarul: ');
readln(n);
n0:=n;
while n0>0 do
begin
n0:=trunc(n0/10);
nr:=nr+1;
end;
for i:=nr-1 downto 0 do
begin
cifra:=trunc(n/power(10,i));
if NOT (odd(nr-i)) then
s:=s+cifra
else
p:=p*(cifra+1);
n:=n mod trunc(power(10,i));
end;
writeln('Suma cifrelor de pe pozitii pare este: ',s);
writeln('Produsul numerelor de pe pozitii impare este: ',p);
End.
#include <cmath>
using namespace std;
int main(){
int n,n0,nr=0,i,cifra,s=0,p=1;
cout<<"Introduceti numarul: ";
cin>>n;
n0=n;
while(n0>0){
n0=n0/10;
nr++;
}
for(i=nr-1;i>=0;i--){
cifra=n/(int)pow(10,i);
if((nr-i)%2==0){
s+=cifra;
}
else{
p*=cifra+1;
}
n=n%(int)pow(10,i);
}
cout<<"Suma cifrelor pare este: "<<s<<endl;
cout<<"Produsul cifrlor impare adunate cu unu este: "<<p;
return 0;
}
Program Tema;
var n,n0,nr,i,cifra,s,p:integer;
Begin
s:=0;
p:=1;
writeln('Introduceti numarul: ');
readln(n);
n0:=n;
while n0>0 do
begin
n0:=trunc(n0/10);
nr:=nr+1;
end;
for i:=nr-1 downto 0 do
begin
cifra:=trunc(n/power(10,i));
if NOT (odd(nr-i)) then
s:=s+cifra
else
p:=p*(cifra+1);
n:=n mod trunc(power(10,i));
end;
writeln('Suma cifrelor de pe pozitii pare este: ',s);
writeln('Produsul numerelor de pe pozitii impare este: ',p);
End.
Marcea26:
Mulțumesc mult
Alte întrebări interesante
Studii sociale,
8 ani în urmă
Matematică,
8 ani în urmă
Limba română,
8 ani în urmă
Limba română,
9 ani în urmă
Engleza,
9 ani în urmă
Matematică,
9 ani în urmă
Limba română,
9 ani în urmă
Latina,
9 ani în urmă