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

Дано натуральное число N. Переставить местами его цифры так, чтобы получилось минимальное число, записанное теми же цифрами. К задаче нарисовать блок-схему и написать код в 1С.

Показать ответ
Ответ:
la23s
la23s
13.08.2022 07:55
#include <iostream>using namespace std; int main(){     char str [] = "dd yhd yw dcjkayt dvqv auyj fbajk dyusdv sddw";     int k = 9; //position     int before=  0, after = 0, space = 0;                         for(int i = 0; i <= k; i++){             if(str[i] == ' '){                 space++;             }         }         if(str[k] != ' '){       for(int i = k + 1; str[i]; i++){         if(str[i] == ' ' || str[i] == '\0'){             after = i;                         break;                 }         }         for(int j = k - 1; j >= 0; j--){         if(str[j] == ' ' || j == 0){             before = j;                         break;                 }     }         cout<<space + 1<<" slovo ";         for(int i = before; i < after; i++)         cout<<str[i];         }         else cout<<space<<" slovo"; return 0; }
0,0(0 оценок)
Ответ:
marushakeduard
marushakeduard
09.11.2020 20:48
/* C++ */
/*Массив заполняется случайными числами от -20 до 20*/
#include <iostream>
#include <cstdlib>
#include <ctime>

using namespace std;

int main() {
    setlocale(LC_ALL, "Russian");
    int M[5][7], N[5][7];
    int C[5], D[5];
    int CountA, CountB;
    srand(time(NULL));
    printf("       *** Массив M ***\n");
    for (int i = 0; i < 5; i++)
    {
        CountA = 0;
        for (int j = 0; j < 7; j++) {
            M[i][j] = rand() % 41 - 20;
            if (M[i][j] < 0) CountA++;
            printf("%4d", M[i][j]);
        }
        C[i] = CountA;
        printf("\n");
    }
    printf("\n");
    printf("       *** Массив N ***\n");
    for (int i = 0; i < 5; i++)
    {
        CountB = 0;
        for (int j = 0; j < 7; j++) {
            N[i][j] = rand() % 41 - 20;
            if (N[i][j] < 0) CountB++;
            printf("%4d", N[i][j]);
        }
        D[i] = CountB;
        printf("\n");
    }
    printf("\n");
    printf("*** Массив C ***\n");
    for (int i = 0; i < 5; i++) printf("%8d\n", C[i]);
    printf("\n");
    printf("*** Массив D ***\n");
    for (int i = 0; i < 5; i++) printf("%8d\n", D[i]);
    printf("\n");
    system("pause");
    return 0;
}

//=================================================
//Pascal
var
  M, N: array [1 .. 5, 1 .. 7] of integer;
  C, D: array [1 .. 5] of integer;
  i, j, CountA, CountB: integer;
begin
  randomize;
  writeln('        ***** Массив M *****');
  for i := 1 to 5 do
  begin
    CountA := 0;
    for j := 1 to 7 do
    begin
      M[i, j] := random(41) - 20;
      if M[i, j] < 0 then CountA := CountA + 1;
      write(M[i, j]:5);
    end;
    C[i] := CountA;
    writeln;
  end;
  writeln;
  writeln('        ***** Массив N *****');
  for i := 1 to 5 do
  begin
    CountB := 0;
    for j := 1 to 7 do
    begin
      N[i, j] := random(41) - 20;
      if N[i, j] < 0 then CountB := CountB + 1;
      write(N[i, j]:5);
    end;
    D[i] := CountB;
    writeln;
  end;
  writeln;
  writeln('Массив C');
  for i := 1 to 5 do writeln(C[i]:4);
  writeln;
  writeln('Массив D');
  for i := 1 to 5 do writeln(D[i]:4);
  writeln;
  readln;
end.

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