1) Хранение информации -в технике информация хранится на различных носителях к примеру: жёсткий диск или карта памяти или микросхема, чипсет 2) Обработка информация - Обработка информации в технике может проходить посредством: обработки графической информации,к примеру,видеокарта обрабатывает цифровую информацию и воспроизводит её графически на нашем мониторе, дисплее, или телефонная связь,телефон записывает наш звук - речь и кодирует её в спец сигнал и после декодирует в трубке собеседника 3) Передача информации - техническая передача информации происходит посредством телефонной сети (телефонные разговоры), Интернет, Bluetooth, Wi-Fi, IrDA (ИК-порт), NFC и т.д
Program abc; type mas = array[0..1000] of integer; var a: mas; i, n, max: integer; begin WriteLn('Введите кол-во эл-тов массива:'); ReadLn(n); for i := 1 to n do begin WriteLn('Введите значение элемента №', i); ReadLn(a[i]); end; WriteLn('Все элементы массива имеют значение'); max := -1; for i := 1 to n do if a[i] > max then max := a[i]; if max <> -1 then Writeln('Максимальное значение положительного элемент = ', max) else Writeln('Положительных элементов нет'); ReadLn; end.
var n, i, t, min:Integer;
begin
write('Введите число измерений: ');
readln(n);
for i:=1 to n do begin
write(i, '-е измерение равно: ');
read(t);
if t < 0 then
writeln('Воздух холодный')
else
writeln('Воздух горячий');
end;
end.