1)Материальные ресурсы – чаще всего сырье, ресурсы, материалы, которые человек обрабатывает для своих потребностей. Практически все материальные ресурсы одноразовые. Выплавив из руды металл – повторно использовать ту же руду не получится.
Информационные ресурсы – документы (книги , стать , публикации и т.д) , которые находятся в информационных системах (библиотеках, архивах, банках данных и т.п.). Другими словами это информация, хранящаяся на каком-то доступном носителе.
Основное отличие информационных ресурсов от материальных – это многократное их использование и копирование. Книга не уничтожится после прочтения и её можно скопировать. Таких действий совершить с материальными ресурсами не получится.
2) основные виды национальных информационных ресурсов:
· Библиотечные ресурсы
· Архивные ресурсы
· Научно-техническая информация
· Правовая информация
· Информация государственных (властных) структур
· Отраслевая информация
· Финансовая и экономическая информация
· Информация о природных ресурсах
· Информация предприятий и учреждений
3) Здесь каждый сам может ответить, но если ничего не приходит в голову,то каждый чуловек точно пользовался следующими видами:
· Библиотечными ресурсами – каждый хотя бы раз заходил в библиотеку за книгой.
· Научно-техническая информация – сюда же можно отнести инструкции для каких-либо приборов и их починки.
· Правовая информация – думаю конституцию и законы все хотя бы немного читали.
· Информация предприятий и учереждений .
Pascal
var
s : string = 'Вчера лиса Алиса пришла к коту Базилио и поинтересовалась его здоровьем.';
i : integer;
s1, sR : string;
begin
s:=s+' ';
i :=1;
sR :='';
s1:='';
while i <= length(s) do begin
if (s[i] = ' ') then begin
if s1[1] <> UpperCase(s1[1]) then
sR := sr + s1 + ' ';
s1:=''
end
else
s1:=s1 + s[i];
inc(i);
end;
delete(sR, length(sR), 1);
print(sR);
end.
А вот на PascalABC.Net. заметно короче будет
begin
var s := 'Вчера лиса Алиса пришла к коту Базилио и поинтересовалась его здоровьем.';
var a := s.ToWords.Where(v -> (v.First <> v.First.ToUpper)).JoinIntoString();
println(a);
end.
Поделитесь своими знаниями, ответьте на вопрос:
Дан массив размера n×n. необходимо вывести положительные элементы главной диагонали. формат входных данных натуральное число n — размер массива (n≤50 в следующих n строках вводится сам массив, состоящий из целых чисел, по модулю не превышающих 100. формат выходных данных требуется вывести положительные элементы главной диагонали или «no such elements», если положительных элементов нет. примеры входные данные выходные данные 4 22 7 -9 23 17 -19 -24 25 20 47 31 -16 -42 -45 29 49 22 31 49 3 -3 18 -36 -16 -1 0 -16 9 -3 no such elements
for (size_t i = 0; i < n; ++i) if (matrix[i][i] >= 0) cout << matrix[i][i] << '\,n';