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

Посоветуйте для паскаля на массивы

👇
Ответ:
Яна775975
Яна775975
31.01.2023
1)Вычислить сумму наибольших значений в строках.
2)Вычислите произведение элементов по строкам и по столбцам.
3)Найдите элемент, находящийся на пересечении строки и столбца с максимальным значением суммы по строкам и по столбцам.
4)В каждой строке двумерного массива вычислить количество, сумму и среднее арифметическое отрицательных элементов.
5)Вычислите сумму элементов, значения которых делятся на 4.
6)Найдите наибольший элемент главной диагонали.(квадратный массив) 
4,7(4 оценок)
Ответ:
малинка20177
малинка20177
31.01.2023
Задан упорядоченный по возрастанию целочисленный массив. Сформировать второй массив из случайных...Дан массив целых чисел. Проверить, есть ли в нем одинаковые элементы.Заполнить массив случайными числами, вывести его на экран. Найти самую длинную последовательность...
4,6(98 оценок)
Открыть все ответы
Ответ:
klevchuk71p06srz
klevchuk71p06srz
31.01.2023
Для решения всех задач используется формула S = v*t, где S - объем файла, v - скорость передачи файла, t - время передачи.
1. 
4 Мбайта = 4*1024 Кбайт = 4096 Кбайт
S1 = v*t1, S2 = v*t2
S2 = (S1/t1)*t2 = (4096/100)*75 = 3072 Кбайт

2.
8 Мбайт = 8*1024 Кбайт = 8192 Кбайт
S1 = v*t1, S2 = v*t2
S2 = (S1/t1)*t2 = (8192/100)*25 = 2048 Кбайт

3.
15 Кбайт = 15*1024 байт = 15*1024*8 бит
S = v1*t1, S = v2*t2
v1 = S/t1, v2 = v1+512 = S/t1+512 = 15*1024*8/120+512 = 1536
t2 = S/v2 = 15*1024*8/1536 = 80 c

4.
S1 = v*t1, S2 = v*t2
2 мин = 120 с
t2 = S2/v = S2/(S1/t1) = 4/(3/120) = 160 с

5.
3 Мбайта = 3*1024 Кбайт = 3072 Кбайт
S1 = v*t1, S2 = v*t2
S2 = (S1/t1)*t2 = (3072/60)*40 = 2048 Кбайт
4,6(26 оценок)
Ответ:
anyutra
anyutra
31.01.2023
Const n=10;
var 
  a,b:array [1..n] of integer;
  i,min1,min2,k:integer;
begin
  randomize;
  For i:=1 to n do begin
    a[i]:=random(10);    
    b[i]:=random(10);
  end;
  writeln (a);
  writeln (b);
  writeln;
  min1:=1000;
  min2:=1000;
  For i:=1 to n do begin
    if a[i]<min1 then min1:=a[i];
    if b[i]<min2 then begin min2:=b[i]; k:=i end;
  end;
  if k<n 
    then begin 
      b[k+1]:=min1; 
      writeln (a);
      writeln (b);
    end
    else writeln ('Минимальным является последний элемент');  
end.

Примеры:
1)
[4,5,2,2,7,3,8,6,8,6]
[5,5,2,2,3,7,9,9,4,1]

Минимальным является последний элемент

2)
[0,1,7,3,1,1,0,1,6,1]
[8,3,8,0,7,2,1,4,0,9]

[0,1,7,3,1,1,0,1,6,1]
[8,3,8,0,0,2,1,4,0,9]


PS: Менять N можно в описании константы
4,7(16 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ