Программа:
Pascal:
var
A: array of integer = (-10, 16, 3, -19, 0, -10, 30);
i, pr: integer;
begin
writeln('Массив: ', A);
write('Отрицательные элементы: ');
for i := 0 to 6 do begin
if A[i] < 0 then
write(A[i], ' ');
if (A[i] > 0) and (A[i] mod 2 = 0) then
pr *= A[i];
end;
writeln(#13, 'Произведение положительных элементов, кратных 2: ', pr);
end.
В начале выделяем память массиву и сразу заполняем его числами. После - регистрируем переменные, которые будем использовать в дальнейшем. Выводим массив, после - выводим просто надпись "отрицательные элементы". После этого циклом проходимся по элементам массива (в ЯП Pascal 1-й элемент массива имеет порядковый номер 0, поэтому цикл от 0 до 6). Если число отрицательное, вывести его; также в этом цикле находим произведение положительных элементов, кратных двум. В конце выводим произведение положительных элементов.
1 Тема) Когда появились первые боевые роботы?
В 1910 году, вдохновлённый успехами братьев Райт, молодой американский военный инженер из Огайо Чарльз Кеттеринг предложил использовать летательные аппараты без человека. По его замыслу управляемое часовым механизмом устройство в заданном месте должно было сбрасывать крылья и падать как бомба на врага. Получив финансирование армии США, он построил, и с переменным успехом испытал несколько устройств, получивших названия The Kattering Aerial Torpedo, Kettering Bug (или просто Bug), но в боевых действиях они так и не применялись.
Объяснение:
Как то так
Поделитесь своими знаниями, ответьте на вопрос:
№1 объем информацинного сообщения 12582912 битов выразить в килобайтах и мегабайтах. № 2 один символ алфавита "весит" 4 бита. сколько символов в этом алфавите? № 3 каждый символ алфавита записан с 8 цифр двоичного кода. сколько символов в этом алфавите? № 4 алфавит состоит из 100 символов. какое количество информации несет один символ этого алфавита? № 5 книга, набранная с компьютера, содержит 150 страниц. на каждой странице — 40 строк, в каждой строке — 60 символов. каков объем информации в книге? ответ дайте в килобайтах.
№2 Если вычеслять из превого задания то 3145728
№3 Так как одна цыфра двоичного кода ровна 1 биту тогда, выходя из первого задания, в этом алфавите 1572864 символов
№4 Исходя из первого задания в одном символе этого алфовита 125829,12 битов
№5 2880 Килобитов или 360 Килобайтов! (Вроде)