1. дан массив, состоящий из 15 элементов. элементы вводятся случайным образом. найти количество элементов, кратных 3. (промежуток от 10 до 30) 2. дан массив, состоящий из 10 элементов. элементы вводятся случайным образом из промежутка от [-10, +10]. найти количество элементов, которые четны и положительны {используем в условии связку и=and} в виде программы для паскаля!

1)var a:array[1..15] of integer;
i,s:integer;
begin
randomize;
for i:=1 to 15 do a[i]:=random(20)+10;
for i:=1 to 15 do if a[i] mod 3=0 then s:=s+1;
writeln(s);
end.
2)var  a: array[1..10] of integer; 
i, s: integer;
begin 
randomize; 
for i := 1 to 10 do a[i] := random(21) - 10; 
for i := 1 to 10 do if (a[i] > 0) and (a[i] mod 2 = 0) then s := s + 1; 
writeln(s);
end.

#include <iostream>
using namespace std;
 
int main()
{
    int i = 0;
    cin >> i;
    switch(i) {
        case(1) : { cout << "Вторник"; break; }
        case(2) : { cout << "Среда"; break; }
        case(3) : { cout << "Четверг"; break; }
        case(4) : { cout << "Пятница"; break; }
        case(5) : { cout << "Суббота"; break; }
        case(6) : { cout << "Воскресенье"; break; }
        case(7) : { cout << "Понедельник"; break; }
    }
    return 0;
}

1. 1 гигабайт =1024 мегабайта, значит для записи 4 гигабайт потребуется 4096 мегабайт, если один диск содержит 700 мегабайт, то 700*6=4200 мегабайт, это хватит для записи фильма. ответ (с-6)
2. Один символ = 8 битам информации, в сообщении "5 класс" 7 символов (пробел тоже символ), значит 8*7=56 бит информации. ответ (с-56)
3. Сначала переведём 1 байт в биты = 8 бит. Затем вспомним, что один символ содержит 8 бит, соответственно 8*60=480 бит в одной строке, затем посчитаем сколько содержится в 30 строках 480*30=14400 бит. ответ: на одной странице содержится 14400 бит информации.