При запуске программа ожидает ввода с подсказкой «Введите 1 — рекомендация, off — завершить». 1. Если введено «1», то запрашивается ввод настроения. 1.1. Если настроение «весёлое», то печатается: «Мультфильм Шрек». 1.2. Для остальных настроений –– «Мультфильм Алладин».
2. Если введено «off», программа завершает работу.
Вот посмотри, может сем uses crt; var s: string; function Kslov (str: string; c: char): integer; var i,k: integer; begin str:=str+' '; k:=0; for i:=1 to length(str)-1 do if (str[i+1] in [' ','.',',','-',':',';','!','?']) and (str[i]=c) then inc(k); Kslov:=k; end; procedure Del(var str: string); var i,j: integer; begin str:=str+' '; i:=length(str)+1; repeat dec(i); until(str[i+1]=' ') and (str[i]='о'); j:=i; repeat dec(i); until(str[i+1]=' ') or (i=1); delete(str,i,j-i); end; begin write('s='); readln(s); if Kslov (s,'о')>Kslov (s,'а') then Del(s); write('s=',s); End.
Теоретической основой информатики является группа фундаментальных наук таких как: теория информации, теория алгоритмов, математическая логика, теория формальных языков и грамматик, комбинаторный анализ и т.д. Кроме них информатика включает такие разделы, как архитектура ЭВМ, операционные системы, теория баз данных, технология программирования и многие другие. Важным в определении информатики как науки является то, что с одной стороны, она занимается изучением устройств и принципов действия средств вычислительной техники, а с другой – систематизацией приемов и методов работы с программами, управляющими этой техникой.
Информационная технология – это совокупность конкретных технических и программных средств, с которых выполняются разнообразные операции по обработке информации во всех сферах нашей жизни и деятельности. Иногда информационную технологию называют компьютерной технологией или прикладной информатикой.
Информация аналоговая и цифровая. Термин «информация» восходит к латинскому informatio,– разъяснение, изложение, осведомленность.
Информацию можно классифицировать разными и разные науки это делают по-разному. Например, в философии различают информацию объективную и субъективную. Объективная информация отражает явления природы и человеческого общества. Субъективная информация создается людьми и отражает их взгляд на объективные явления.
В информатике отдельно рассматривается аналоговая информация и цифровая. Это важно, поскольку человек благодаря своим органам чувств, привык иметь дело с аналоговой информацией, а вычислительная техника, наоборот, в основном, работает с цифровой информацией.
start = input('Введите 1 — рекомендация, off — завершить:')
while start != 'off':
if start == '1':
mood = input('Ваше настроение:')
if mood == 'весёлое':
print('Мультфильм Шрек')
start = input('Введите 1 — рекомендация, off — завершить:')
else:
print('Мультфильм Алладин')
start = input('Введите 1 — рекомендация, off — завершить:')
else:
print('Вы ввели что-то не то, попробуйте еще раз')
start = input('Введите 1 — рекомендация, off — завершить:')
Объяснение: