(40puncte)Elaborati un program:
Anexe:
Răspunsuri la întrebare
Răspuns de
0
Răspuns:
#include <iostream>
using namespace std;
int main()
{
int n,i,k,s,r;
i=0;
k=0;
while(i<=100)
{
s=0;
n=i;
while(n!=0)
{
r=n%10;
s=s+r;
n=n/10;
}
if(s==5)
k++;
i++;
}
cout<<k;
return 0;
}
Explicație:
Alte întrebări interesante
Matematică,
8 ani în urmă
Matematică,
8 ani în urmă
Matematică,
8 ani în urmă
Limba rusă,
8 ani în urmă
Limba română,
8 ani în urmă
Matematică,
9 ani în urmă
Matematică,
9 ani în urmă
uses Crt;
type natural=0..maxint;
var i,k,m,n:natural;
function sumacif(i:natural):natural;
var suma:natural;
begin
suma:=0;
repeat
suma:=suma+(i mod 10);
i:=i div 10;
until i=0;
Sumacif:=suma;
end;
function solposib (i:natural):boolean;
begin
if sumacif (i)=m then solposib:=true
else solposib:=false
end;
procedure presol (i:natural);
begin
Writeln('i=',i);
k:=k+1;
end;
begin
clrscr;
n:=100;
m:=5;
k:=0;
for i:=0 to n do
if solposib (i)then presol(i);
writeln ('k=',k);
readln;
end.