Var s: array[1..4] of string=('тысяч - ','сотен - ','десятков - ','единиц - ');
<span> nm: string;
</span><span> i: integer;
</span><span>begin
</span><span> write('n = '); readln(nm);
</span><span> for i:=1 to 4 do
</span><span> writeln('цифра ',s[i],nm[i]);
</span><span>end.
</span>
n = 9214
<span>цифра тысяч - 9
</span><span>цифра сотен - 2
</span><span>цифра десятков - 1
</span><span>цифра единиц - 4
</span>
На каком языке требуется составить программу?
Решение смотри во вложении.
//Dev-C++ 4.9.9.2
#include <iostream>
using namespace std;
int main(){
int a,s=0;
for(int i=0;i<10;i++){
cin>>a;
if(a>5)s=s+a;
}
cout<<s;
cin.get();
cin.get();
return 0;
}
Пример ввода:
1
2
3
4
5
10
10
10
10
10
Пример вывода:
50