begin
var число : = readinteger('введите натуральное число: ');
var (четных, нечетных) : = (0, 0);
while число > 0 do
begin
if (число mod 10).isodd then inc(нечетных)
else inc(четных);
число : = число div 10
end;
println('нечетных', нечетных, 'четных', четных)
end.
введите натуральное число: 1406439 нечетных 3 четных 4#include "iostream"
#include "stdlib.h"
#include "locale.h"
using namespace std;
int main(){
setlocale(lc_all, "russian");
const int n = 10;
int a[n];
for(int i = 0; i < n; i++){
cout < < "ââåäèòå [" < < i < < "] ýëåìåíò: "; cin > > a[i];
}
cout < < "ìàññèâ äî îáðàáîòêè" < < endl;
for(int i = 0; i < n; i++){
cout < < "ýëåìåíò [" < < i < < "] = " < < a[i] < < endl;
}
for(int i = 0; i < (n/2); i++){
int temp = a[i];
a[i] = a[n-i-1];
a[n-i-1] = temp;
}
cout < < "ìàññèâ ïîñëå" < < endl;
for(int i = 0; i < n; i++){
cout < < "ýëåìåíò [" < < i < < "] = " < < a[i] < < endl;
}
system("pause");
return 0;
}
Поделитесь своими знаниями, ответьте на вопрос:
Втрёх из ниже перечисленных программ можно создать анимационные ролики(мультфильмы), а в одной нельзя. в какой? 1)майкрософт офис ворд 2) паинт 3)презентация майкросот офис повер поинт 4)scratch ( ! )