напишите программу, которая получает номер месяца и выводит ему соответствующее время года или сообщение об ошибки(язык паскаль)
258
446
Ответы на вопрос:
Var s,s1: string; a: array[1..100] of string; n,i,j,k: byte; begin writeln('введите текст из слов, разделенных пробелами'); readln(s); s: =' '+s+' '; n: =length(s); i: =2; k: =0; while i< =n do if (s[i]< > ' ')and (s[i-1]=' ') then begin k: =k+1; j: =i; s1: =''; while (j< =n) and (s[j]< > ' ') do begin s1: =s1+s[j]; j: =j+1; end; a[k]: =s1; i: =i+length(s1); end else i: =i+1; for i: =1 to k-1 do for j: =i+1 to k do if a[i]> a[j] then begin s1: =a[i]; a[i]: =a[j]; a[j]: =s1 end; writeln('слова текста в алфавитном порядке: '); for i: =1 to k do writeln(a[i]); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Няша17777777777712.01.2022 17:55
-
ukaldarbek20622.04.2021 16:38
-
Vovannik05.12.2020 08:02
-
McShram111119.05.2023 08:13
-
1Raffaelka101.02.2021 13:35
-
faets03.03.2023 11:10
-
nastia1902200406.01.2021 16:47
-
nekit322113.06.2020 14:09
-
Nastya2861219.06.2020 02:28
-
neznaika111222209.09.2021 16:41
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.