1. Термин "информатика" возник в 60-х гг. XX в. во Франции для названия области, занимающейся автоматизированной обработкой информации с электронных вычислительных машин.
2. Информатика — это комплексная, техническая наука, которая изучает и систематизирует законы и приемы создания, сохранения, воспроизведения, получения, обработки и передачи данных средствами вычислительной техники, а также принципы функционирования этих средств и методы управления ними.
3. Важная особенность информатики – широчайшие приложения, охватывающие почти все виды человеческой деятельности: производство, управление, науку, образование, проектные разработки, торговлю, финансовую сферу, медицину, криминалистику, охрану окружающей среды и др.
4. Задачи информатики как науки составляют:
изучить структуру, общие свойства информации, исследовать законы и методы создания, преобразования, накопления, передачи и использования информации. систематизация приемов и методов работы с аппаратными и программными средствами вычислительной техники.
7.Наиболее обобщенными информационными процессами являются сбор, преобразование, использование информации. К основным информационным процессам, изучаемым в курсе информатики, относятся: поиск, отбор, хранение, передача, кодирование, обработка, защита информации.
8.Информационная деятельность человека – это деятельность, связанная с процессами получения, преобразования, накопления и передачи информации. ... Вместе с тем человечеству всегда приходилось решать задачи управления, накопления, обработки и передачи информации, опыта, знания.
DIM ch$(26) FOR i = 1 TO 26 ch$(i) = CHR$(ASC("a") + i - 1) NEXT
DIM cw(26) AS LONG
PRINT "text:" INPUT "", s$ DO WHILE s$ <> "*" s$ = s$ + " " iw = 0 FOR i = 1 TO LEN(s$) c$ = MID$(s$, i, 1) IF iw = 0 AND c$ <> " " THEN iw = 1 idx = ASC(c$) - ASC("a") + 1 cw(idx) = cw(idx) + 1 ELSEIF iw = 1 AND c$ = " " THEN iw = 0 END IF NEXT INPUT "", s$ LOOP
FOR i = 1 TO 25 m = i FOR j = i TO 26 IF cw(j) > cw(m) OR (cw(j) = cw(m) AND ch$(j) < ch$(m)) THEN m = j END IF NEXT IF m <> i THEN tmp = cw(m) cw(m) = cw(i) cw(i) = tmp tmp$ = ch$(m) ch$(m) = ch$(i) ch$(i) = tmp$ END IF NEXT
FOR i = 1 TO 26 IF cw(i) <> 0 THEN PRINT ch$(i) + ":"; cw(i) END IF NEXT
ОТВЕТ ЕСТЬ НА 1,2,3,4,7,8 ВОПРОС
1. Термин "информатика" возник в 60-х гг. XX в. во Франции для названия области, занимающейся автоматизированной обработкой информации с электронных вычислительных машин.
2. Информатика — это комплексная, техническая наука, которая изучает и систематизирует законы и приемы создания, сохранения, воспроизведения, получения, обработки и передачи данных средствами вычислительной техники, а также принципы функционирования этих средств и методы управления ними.
3. Важная особенность информатики – широчайшие приложения, охватывающие почти все виды человеческой деятельности: производство, управление, науку, образование, проектные разработки, торговлю, финансовую сферу, медицину, криминалистику, охрану окружающей среды и др.
4. Задачи информатики как науки составляют:
изучить структуру, общие свойства информации, исследовать законы и методы создания, преобразования, накопления, передачи и использования информации. систематизация приемов и методов работы с аппаратными и программными средствами вычислительной техники.
7.Наиболее обобщенными информационными процессами являются сбор, преобразование, использование информации. К основным информационным процессам, изучаемым в курсе информатики, относятся: поиск, отбор, хранение, передача, кодирование, обработка, защита информации.
8.Информационная деятельность человека – это деятельность, связанная с процессами получения, преобразования, накопления и передачи информации. ... Вместе с тем человечеству всегда приходилось решать задачи управления, накопления, обработки и передачи информации, опыта, знания.
FOR i = 1 TO 26
ch$(i) = CHR$(ASC("a") + i - 1)
NEXT
DIM cw(26) AS LONG
PRINT "text:"
INPUT "", s$
DO WHILE s$ <> "*"
s$ = s$ + " "
iw = 0
FOR i = 1 TO LEN(s$)
c$ = MID$(s$, i, 1)
IF iw = 0 AND c$ <> " " THEN
iw = 1
idx = ASC(c$) - ASC("a") + 1
cw(idx) = cw(idx) + 1
ELSEIF iw = 1 AND c$ = " " THEN
iw = 0
END IF
NEXT
INPUT "", s$
LOOP
FOR i = 1 TO 25
m = i
FOR j = i TO 26
IF cw(j) > cw(m) OR (cw(j) = cw(m) AND ch$(j) < ch$(m)) THEN
m = j
END IF
NEXT
IF m <> i THEN
tmp = cw(m)
cw(m) = cw(i)
cw(i) = tmp
tmp$ = ch$(m)
ch$(m) = ch$(i)
ch$(i) = tmp$
END IF
NEXT
FOR i = 1 TO 26
IF cw(i) <> 0 THEN
PRINT ch$(i) + ":"; cw(i)
END IF
NEXT