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

A»: а) заполните все элементы массива значением x , введённым с клавиатуры. б) заполните массив первыми n натуральными числами, начиная с x (значение x введите с клавиатуры). в кумире

Показать ответ
Ответ:
Анастасия23102002
Анастасия23102002
21.03.2023 06:03

В Microsoft Office Word 2007 отформатировать таблицу после ее создания можно несколькими Применение стилей таблиц позволяет задать формат сразу для всей таблицы, а также выполнить предварительный просмотр, чтобы заранее увидеть, как будет выглядеть таблица с выбранным стилем форматирования.

Таблицы можно изменять путем разбиения или объединения ячеек, добавления и удаления столбцов и строк, а также рисования. При работе с большими таблицами можно задать отображение заголовка таблицы на каждой из страниц, на которых она выводится. Чтобы исключить непредусмотренные разрывы потока данных в таблице, можно указать, в каких местах должны находиться разрывы страницы.

Объяснение:

0,0(0 оценок)
Ответ:
255615
255615
17.03.2022 22:06
Program fofgogjoj;
 var   
arr: array[1..1000] of byte;   
max_num, min_num: byte;   
i: byte;   
n,p:integer; 
begin   
randomize; 
Wriiteln('Введите число n');
Readln(n);   
for i := 1 to n do begin       
arr[i] := random(100);       
 Write (arr[i]:3);   
end;       
 max_num := arr[1];    
for i := 2 to n do       
 if arr[i] > max_num then
begin                     
max_num := arr[i];       
end;    
Writeln;   
Writeln ('Max = ',max_num);          
min_num := arr[1];    
for i := 2 to n do       
if arr[i] < min_num then
begin                      
min_num := arr[i];       
end;       
Writeln;   
Writeln ('Min = ',min_num);       
P:=max_num*min_num;   
Writeln('Произведение равно:',p); 
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота