Решить . предположим, что длительность непрерывного подключения к сети интернет с модема для некоторых атс не превышает 10 минут. определите максимальный размер файла в кбайтах, который может быть передан за время такого подключения, если модем передает информация в среднем со скоростью 32 килобита/с.

1) 32*60*10=19200 кбит в 10 мин

2) 19200: 8=2400 кбайт в 10 мин

1)var

a: array [1..30] of integer;

i, s, k: integer;

begin

for i : = 1 to 30 do//заполнение рандомными числами(от -15 до 50, включая и -15 и 50) массив

a[i] : = random(-15, 50);

for i : = 1 to 30 do//сумма элементов и подсчет кратных 3

begin

s : = s + a[i]; //сумма элементов

if a[i] mod 3 = 0 then//подсчет кол во кратных 3

k : = k + 1;

end;

writeln('исходный массив');

for i : = 1 to 30 do

writeln('a[', i, '] = ', a[i]);

writeln('сумма элементов массива: ', s);

writeln('кратных 3: ', k);

end.

извини бы дальше но дела но вот подсказки:

2) метод пузырька посмотри

3) там через функцию поиска и удаления

если над у меня есть группа в вк называется просто программки если интересно можешь глянуть

// c++ #include < iostream> using namespace std; const int n = 200; int main() { setlocale(lc_all, "rus"); int data[n]; int pol, otr, sizemas; pol = 0; otr = 0; cout < < "введите размер массива" < < endl; cin > > sizemas; cout < < "введите элементы массива (без 0)" < < endl; for(int i=0; i< sizemas; i++) { cin > > data[i]; } for(int i=0; i< sizemas; i++) { if(data[i] > = 0) { pol++; } else { otr++; } } cout < < "положительных элементов: " < < pol < < endl < < "отрицательных элементов: " < < otr < < endl; return 0; }