Для заданного числа n составьте программу вычисления суммы s=1+1/2+1/3+1/4+…+1/n, где n – натуральное число через repeat

167

345

Посмотреть ответы 2

Ответы на вопрос:

666Dim

Информатика

4,7(17 оценок)

program raf105;

var

i,n: integer;

s: real;

begin

write('n = ');

readln(n);

repeat

i: = i+1;

s: = s+1/i;

until i=n;

writeln('сумма: ',s);

end.

pascalabc 3.4.2

TupoyKakProbka

Информатика

4,5(7 оценок)

1) #include < iostream> #include < conio.h> #include < string> using namespace std; int main() { string str; getline(cin, str); for (int i = 1; i < str.length(); i++) { if (i % 3 == 0) {cout < < str[i] < < endl; } } _getch(); return 0; } 2) #include < iostream> #include < conio.h> #include < string> using namespace std; int main() { string str; getline(cin, str); for (int i = 1; i < str.length(); i++) { if (i % 2 == 0) { if (str[i] ! = 'a') { str[i] = 'a'; } if (str[i] ! = 'b') { str[i] = 'b'; } if (str[i] ! = 'c') { str[i] = 'c'; } } } cout < < str < < endl; _getch(); return 0; }