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

Перевести с Паскаля на С++ 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.

Ответ:
deryabina92
deryabina92
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
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?