Наименьшей структурной единицей внутри таблицы является.. строка ячейка столбец диапазон ячейка не может содержать данные в виде… текста формулы числа картинки значения ячеек, которые введены пользователем, а не получаются в результате расчётов называются… текущими производными исходными расчетными укажите правильный адрес ячейки. ф7 р6 7в нет правильного ответа к какому типу программного обеспечения относятся ет? к системному к языкам программирования к прикладному к операционному формула начинается со знака… № = нет правильного ответа какая ячейка называется активной? любая та, где находится курсор заполненная нет правильного ответа какой знак отделяет целую часть числа от дробной : , . нет правильного ответа какого типа сортировки не существует в excel? по убыванию по размеру по возрастанию все виды существуют сколько документов можно одновременно открыть в редакторе word? только один не более трех сколько необходимо зависит от пользователя и ресурсов компьютера открыть или создать новый документ в редакторе microsoft word можно используя панель? стандартная форматирование структура элементы для включения или выключения панелей инструментов в microsoft word следует нажать? вид → панели инструментов сервис → настройка → панели инструментов щелкнув правой копкой мыши по любой из панелей подходят все пункты а, б и в как создать новый документ "стандартный отчет" из шаблонов microsoft word? файл → создать → общие шаблоны → отчеты → стандартный отчет общие шаблоны → отчеты → стандартный отчет файл → отчеты → стандартный отчет файл → создать → стандартный отчет для настройки параметров страницы word надо нажать последовательность? файл → параметры страницы файл → свойства → параметры страницы параметры страницы → свойства правка → параметры страницы какую последовательность операций в microsoft word нужно выполнить для редактирования размера кегля шрифта в выделенном абзаце? вызвать быстрое меню → шрифт → размер формат → шрифт → размер на панели форматирование изменить размер шрифта подходят все пункты а, б и в как найти в тексте документа microsoft word необходимое слово? ctrl f12 правка → найти сервис → найти подходят все пункты а, б и в что означает, если отдельные слова в документе word подчеркнуты красной волнистой линией? это означает, что шрифтовое оформление этих слов отличается от принятых в документе это означает, что эти слова занесены в буфер обмена и могут использоваться при наборе текста это означает, что в этих словах необходимо изменить регистр их написания это означает, что по мнению word в этих словах допущены ошибки
Ответы
Объяснение:
PascalABC.NET. Версия 3.5.1, сборка 2261 (4.11.2019)Задание 1program abc;
const n=2; // Задание начальных параметров массива через константы
const m=2;
var C:array[1..n,1..m] of integer;
A:array[1..n,1..m] of integer;
B:array[1..n,1..m] of integer;
i,j:integer;
begin
for i:=1 to n do
for j:=1 to m do
begin
readln(A[i,j]); // Ввод данных и вычисление по формуле
readln(B[i,j]);
C[i,j]:=A[i,j]+B[i,j];
end;
writeln('C[n,m] = ');
for i:=1 to n do
begin
for j:=1 to m do
write(C[i,j],' '); // Вывод массива
writeln;
end;
end.
Задание 2program abc;
const n=3; // Задание начальных параметров массива через константы
const m=3;
var A:array[1..n,1..m] of integer;
i,j:integer;
begin
for i:=1 to n do
for j:=1 to m do // Ввод данных массива
readln(A[i,j]);
writeln('Оригинальный массив A(n,m):');
for i:=1 to n do // Вывод оригинального массива
begin
for j:=1 to m do
write(A[i,j],' ');
writeln;
end;
for i:=1 to n do // Замена 2-ого столбца 2-ой строкой
A[i,2]:=A[2,i];
writeln('Изменённый массив A(n,m):');
for i:=1 to n do // Вывод изменённого массива
begin
for j:=1 to m do
write(A[i,j],' ');
writeln;
end;
end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
const
nn=30;
mm=30;
var
a:array[1..mm,1..nn] of integer;
m,n,i,j,k,s:integer;
begin
Writeln('Введите число строк и столбцов массива: '); Read(m,n);
Randomize;
Writeln('*** Исходный массив ***');
k:=0;
for i:=1 to m do begin
for j:=1 to n do begin
a[i,j]:=Random(51)-25;
Write(a[i,j]:4);
if Odd(a[i,j]) then Inc(k)
end;
Writeln
end;
if k>5 then begin
Writeln('Средние арифметические отрицательных элементов по строкам');
for i:=1 to m do begin
s:=0; k:=0;
for j:=1 to n do
if a[i,j]<0 then begin Inc(k); s:=s+a[i,j] end;
if k>0 then Writeln(s/k:9:5) else Writeln(' 0.00000');
end
end
else begin
Writeln('*** Результирующий массив ***');
for i:=1 to m do begin
for j:=1 to n do begin a[i,j]:=2*a[i,j]; Write(a[i,j]:4) end;
Writeln
end
end
end.
Тестовые решения:
Введите число строк и столбцов массива:
8 6
*** Исходный массив ***
-16 -8 -1 24 -22 1
-9 -20 -25 13 -11 10
-15 10 -12 20 -22 3
-6 25 -3 25 -14 22
24 -4 24 17 -4 -17
-23 -9 -22 1 -18 -13
-12 13 6 -16 2 -13
19 8 -22 14 -3 4
Средние арифметические отрицательных элементов по строкам
-11.75000
-16.25000
-16.33333
-7.66667
-8.33333
-17.00000
-13.66667
-12.50000
Введите число строк и столбцов массива:
3 5
*** Исходный массив ***
3 24 -21 -22 -8
-21 14 -22 0 -22
15 -16 -2 6 22
*** Результирующий массив ***
6 48 -42 -44 -16
-42 28 -44 0 -44
30 -32 -4 12 44