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

Получить внутреннее представление вещественных чисел 21,75 в формате чисел с плавающей запятой в 2-х байтовой янейче

Показать ответ
Ответ:
JHOOOOOOPE
JHOOOOOOPE
22.01.2023 15:09

Program Program1;
Var
i,min,max,nmin,nmax:integer;
a:array [1..10] of integer;
begin
randomize;
writeln('Исходный массив:');
for i:=1 to 10 do
begin
a[i]:=random(100)+1;
writeln('a[',i,']=',a[i]);
end;
nmin:=1;
min:=a[nmin];
nmax:=1;
max:=a[nmax];
for i:=1 to 10 do
begin
if a[i]>max then
begin
nmax:=i;
max:=a[i];
end;
if a[i]<min then
begin
nmin:=i;
min:=a[i];
end;
end;
a[nmin]:=max;
a[nmax]:=min;
writeln('Минимальный элемент a[',nmin,']=',min,' Максимальный элемент a[',nmax,']=',max);
writeln('Полученный массив:');
for i:=1 to 10 do
writeln('a[',i,']=',a[i]);
end.

0,0(0 оценок)
Ответ:
Veronichkadyi
Veronichkadyi
17.06.2020 16:12

#include <iostream>
using std::cout;
using std::endl;
#include <cstdlib>
using std::rand;
using std::srand;
#include <ctime>
using std::time;
#include <iomanip>
using std::setw;

int main()
{
    int a[6][7];

    srand(time(0));

    for(int i = 0; i < 6; i++)
    {
        for(int j = 0; j < 7; j++)
        {
            a[i][j] = rand() % 17 - 4;

            cout << setw(2) << a[i][j] << ' ';
        }
        cout << endl;
    }
    cout << endl;

    for(int i = 1; i < 6; i += 2)
    {
        for(int j = 0; j < 7; j++)
        {
            a[i][j] = 1;
        }
    }

    for(int i = 0; i < 6; i++)
    {
        for(int j = 0; j < 7; j++)
        {
            cout << setw(2) << a[i][j] << ' ';
        }
        cout << endl;
    }
    cout << endl;

    return 0;
}


Дан двумерный массив 6*7, заполнить [-4; 12] и заменить элементы стоящие в нечёт. строках единицей
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота