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

Составьте на языке паскаль программу вычисления суммы первых десяти целых положительных чисел

👇
Ответ:
tri0
tri0
01.09.2020
Если я все правильно поняла, то должно быть как-то так:

program sum1;
var i: integer;  
sum: integer;
begin
 for i:= 1 to 10 do   
sum:= sum + i;
writeln(sum);
readln;
end.   
4,6(2 оценок)
Открыть все ответы
Ответ:
nataaleksandro2
nataaleksandro2
01.09.2020
Из достоинств коммуникаторов можно отметить: большой размер экрана, многофункциональность, полноценная ОС, возможность синхронизации с ПК, поддержка сторонних приложений. Из недостатков: большие чем у смартфонов габариты и вес, малое время работы, неудобные телефонные функции, т.е. с коммуникаторов не так удобно совершать звонки, как у смартфонов. Достоинством же смартфонов является: удобство совершения звонков, более компактные размеры, поддержка сторонних приложений, более длительное время работы, полноценная ОС, правда не такая продвинутая как в коммуникаторах. Из недостатков: меньшая функциональность, меньший экран, не так удобно, например, читать книжку как в коммуникаторах.
4,6(90 оценок)
Ответ:
Думаю, что-то типа того.

#include <iostream>
#include <stdio.h>

using namespace std;

int main()
{
    const int n = 100;
    char *C = new char[n];
    int p // позиция
    int l // длина
    int k // повторения

    cout << "String C: ";
    cin >> C;
    cout << "Pos: ";
    cin >> p; p--;
    cout << "Length: ";
    cin >> l;
    cout << "N: ";
    cin >> k;
    char *V = new char[l*k+1];

    if ((p >= 0) && (l > 0) && (k > 0) && ((strlen(C) - p) >= l) && (p <= strlen(C))) //проверка ввода
    {
        __asm
        {
            mov ebx, k;           // количество повторений
            mov edi, V         // адрес приёмника
            m1 : cmp   ebx, 0  // сравнение
                 je   exit1    // если EBX = 0, то переход на exit1
                 mov   ecx, l  // длина строки
                 mov   esi, C  // адрес источника
                 add   esi, p  // с заданной позиции
             m2 :
                mov al, [esi]    //из ESI
                mov [edi], al    // запись в EDI
                inc edi            // EDI+1
                inc esi            // ESI+1
                loop  m2        // цикл EСХ раз
                dec ebx         // EBX-1
                jmp m1             // переход на m1
            exit1 : mov[edi], 0
        }

        cout << "\nV: ";
        cout << V << endl;
    }

    else cout <<  "\nError " << endl;

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