В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
dasha199616
dasha199616
03.07.2020 21:20 •  Информатика

Перевести с Паскаля на С++ var
s, p: longint;
i, j, n: integer;

begin
Write('Введите n: '); Readln(n);
s := 0;
for i := 1 to n do
begin
p := 1;
for j := i to 2 * i do p := p * j;
s := s + p
end;
Writeln('Сумма равна ', s)
end.

Ответ:
Mon45
Mon45
19.01.2021 16:22

#include <iostream>

using namespace std;

int main() {

   long int p,s;

   int i,j,n;

   s = 0;

   cout << "Введите n: " << endl;

   cin >> n;

   for(i = 1; i<=n;i++){

       p = 1;

       for(j = i; j<=2*i;j++){

           p*=j;

       }

       s+=p;

   }

   cout << "Сумма равна " << s << endl;

}

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?