Паскаль для решения следующей : заполнить целочисленный массив 20-ю случайными элементами в диапазоне от 20 до 40 и найти сумму лишь нечётных номеров (элементов) массива.
begin randomize; for i := 1 to n do begin a[i] := random(20) + 20; write(a[i], ' '); if i mod 2 = 1 then s := s + a[i]; end;
writeln(); writeln(s); end.
Tselyaritskaya Yurevich
24.02.2021
Дискретные сигналы (они же цифровые) - принимают конечное число значений функции: примеры дискр: - энергетические уровни атома, - сигналы светофора - символы, слова... и т.д. и т.п. непрерывный (он же аналоговый) - принимает бесконечное количество значений функции, амлитуда и время которого меняются непрерывно. примеры непрерывных: - звуковая волна, - диаграмма изменения влажности, напряжения, и других некоторых физических величин
для преобразования непрерывного сигнала в дискретные производят дискретизацию. Процесс дискретизации сопровождается потерей информации если частота дискретизации в 2 раза меньше максимальной частоты непрерывного сигнала по теореме Найквиста... В России эту теорему называют Котельникова.
Nurislamovna1543
24.02.2021
Если удалить из костюма элемент брюки, то он уже не будет костюмом. Если удалить из автомобиля элемент колёса, то без колёс автомобиль не поедит. Если удалить из компьютера элемент процессор, то он не будет больше компьютером. Если удалить из городской телефонной сети элемент электричество в городе, то сеть не будет ловить. Если удалить из школы элемент учитель, то это не будет школой. Если удалить из государства Президента, то кто будет править государством? Сущ.:Костюм, автомобиль, компьютер,школа. Несущ.:Городск. телеф. связь, государство.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Паскаль для решения следующей : заполнить целочисленный массив 20-ю случайными элементами в диапазоне от 20 до 40 и найти сумму лишь нечётных номеров (элементов) массива.
n = 20;
var
a: array[1..n] of integer;
i, s: integer;
begin
randomize;
for i := 1 to n do
begin
a[i] := random(20) + 20;
write(a[i], ' ');
if i mod 2 = 1 then
s := s + a[i];
end;
writeln();
writeln(s);
end.