М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
kupecki
kupecki
16.03.2023 01:52 •  Информатика

Перевидите на c++ . n,n1,i,j: integer; s,k,c: int64; begin readln(n); s: =0; for i: =1 to n do begin read(n1); c: =1; k: =0; for j: =2 to n1 do begin k: =k+c; inc(c); end; s: =s+k; end; writeln(s); readln; readln; end.

👇
Ответ:
SuperNisas
SuperNisas
16.03.2023
#include <iostream>

int main() {
    short int n, n1, i, j;
    long long int s, k, c;
    
    std::cin >> n;
    s = 0;
    for (i = 1; i <= n; i++) {
        std::cin >> n1;
        c = 1;
        k = 0;
        for (i = 2; i <= n1; i++) {
            k += c;
            c++;
        }
        s += k;
    }
    std::cout << s << std::endl;
    std::cin.get();
    return 0;
}
4,7(19 оценок)
Открыть все ответы
Ответ:
vakla
vakla
16.03.2023

Скорее всего большое приемущество обработки данных с электронных  таблиц  в том ,что при такой обработке  допущение ошибки минимально (  это уже зависит от человека ,где он неправильно ввёл данные ) . Если же обрабатывать таблицу вручную ,то верояность допущения ошибок велика!
Так же преимущество  в том ,что при обработке информации при таблицы  намного быстрее проходит этот процесс ,нежеле ты сама  будешь всё  проверять .
Ну и конечно же  люди сейчас настолько ленивы ,чтобы самостоятельно обрабатывать какую-либо информацию, поэтому мы всё доверяем исскуственному разуму:) 

4,7(35 оценок)
Ответ:

program max_elementarray ;

var i, max : integer ;

    a : array [1..10] of integer;

begin

    for i : = 1 to 10 do

          begin

              readln(a[i]);

          end;

    max : = a[1];

    for i : = 2 to 10 do

          if a[i]> max then max : = a[i];

    writeln('max element of array = ',max) ;

    readln ;

end.

4,5(52 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ