А1. 3) устройство вывода предназначено для передачи информации от компьютера пользователю;
А2. 2) D:\SCHOOL\PHYSICS ( в каталоге PHYSICS создан подкаталог 10_CLASS, а потом туда перетащили файл)
А3. 4) 48 байт. (тк 48 символов в высказывании умножить на 1 байт получится 48 байт)
А4. 2) ADD - первая гласная А, вторая согласная (раз первая гласная), третья -буква, которая не стоит на 1 месте.
В3. Для кодирования всех слов требуется 4 бита (N = 2^i , где N - количество слов Эллочки, i - количество бит, нужное для кодирования всех слов)
В4.
1) 225 Кбайт = 230400 байт = 1843200 бит - всго нужно передать
2) 1843200 бит / 14 400 бит/с = 128 секунд нужно модему, чтобы передать сообщение.
Массив
Одномерный, список
Сортируем, Находим, Восхищаемся
Когда потребуется мноого переменных сохранить я позову тебя!
Массив!
Ответ:
=ЕСЛИ(ИЛИ((A2=12);(A2=1);(A2=2));"Зима";ЕСЛИ(ИЛИ((A2=3);(A2=4);(A2=5));"Весна";ЕСЛИ(ИЛИ((A2=6);(A2=7);(A2=8));"Лето";ЕСЛИ(ИЛИ((A2=9);(A2=10);(A2=11));"Осень";" - "))))
Объяснение:
// Дан массив целых чисел. Все нечетные элементы удвоить, а четные уменьшить вдвое.
var a: array [1..10] of real; // возьмем массив из 10 чисел
i,x :byte;
begin
randomize;
for i:=1 to 10 do //заполняем исходный массив случайными числами (до 1000)
begin
a[i]:=random(1000);
writeln (i,' элемент исходного массива ',a[i]);
end;
writeln ();
for i:=1 to 10 do
begin
x:=i mod 2; //определяем четный или нет элемент массива
if x=0 then //если элемент четный
begin
a[i]:=a[i]/2;
writeln (i,' элемент массива - четный ',a[i]);
end
else //если элемент нечетный
begin
a[i]:=a[i]*2;
writeln (i,' элемент массива - нечетный ',a[i]);
end;
end;
<span>end.</span>
<em>// PascalABC.NET 3.2, сборка 1336 от 14.11.2016</em>
begin
Writeln(Range(5,109,4).Sum)
end.
Результат
1539