Ответ
0/5
(0 оценок)
1
Ответ
0/5
(0 оценок)
1
pinguinbird
4 года назад
Светило науки - 510 ответов - 0 раз оказано помощи
Ответ:
var i,a,b,c,d,f:integer;
begin
for i:=1000 to 9999 do begin
a := i mod 10;
b := (i div 10) mod 10;
c := (i div 100) mod 10;
d := (i div 1000) mod 10;
f := a + b + c + d;
if f = 15 then write(i,' ');
end;
end.
Мозг
Отвечающий
#include <iostream>
using namespace std;
signed main(){
for(int i = 1000; i < 10000; i++){
int k1,k2,k3,k4, num = i;
k1 = num % 10;
num /= 10;
k2 = num % 10;
num /= 10;
k3 = num % 10;
num /= 10;
k4 = num % 10;
if(k1 + k2 + k3 + k4 == 15)
cout << i << " ";
}
}