Составить программку,которая:
а)из слов «программка»составляет слова: » грамм», «рога», «гора»;
б) из слов » ужас», «белка», «цыпленок» получает слово»столбец»;
в)считает, сколько раз в тексте, данном с клавиатуры, встречается, кусок «ба».
Anatolij Zufarov 2018-12-26 00:48:06
надобно составить ПРОГРАММУ.
- Антон Якманов
- Информатика
- 2018-12-26 00:43:06
- 1
Павел Прибышковский 2018-12-26 00:53:01
Program z1; var s, s1, s2, s3, s4, s5, s6, s7, s8:string; begin s:=’программка’; s1:=copy (s, 4, 4); s4:=copy (s, 2, 3); s5:=copy (s, 2, 1); s2:=s4+s5; s6:=copy (s, 4, 1); s7:=copy (s, 3, 1); s8:=copy (s, 5, 2); s3:=s6+s7+s8; writeln (s1, s2, s3); end. Взгляни, это пункт а. Если то, что необходимо, сделаю остальные.. Program z1; var s, s1, s2, s3, st, o, l, be, c: string; begin s1:=’ужас’; s2:=’белка’; s3:=’цыпленок’; st:=copy (s1, 1, 2); o:=copy (s3, 7, 1); l:=copy (s2, 3, 1); be:=copy (s2, 1, 2); c:=copy (s3, 1, 1); s:=st+o+l+be+c; writeln (s); end.
Подробный разбор правила N2: составьте список за что вы его любите
Iljushka Lugovoj 2018-12-26 00:56:01
Буду очень признательна,если поможешь сделать остальные. вроде всё так как надобно, спасибо!
Тимур Шимчак 2018-12-26 01:00:04
Program z1;var s, s1, s2, st, o, l, be, c: string;begin s1:=’ужас’; s2:=’белка’; s3:=’цыпленок’; st:=copy (s1, 1, 2); o:=copy (s3, 7, 1); l:=copy (s2, 3, 1); be:=copy (s2, 1, 2); c:=copy (s3, 1, 1); s:=st+o+l+be+c; writeln (s);end.
Афонасьева Амина 2018-12-26 01:06:17
Пренебрегал, еще в var добавь переменную s3.. и желанно все это на компютере проветить, а то я на память пишу..
Источник: obrazovalka.com
Из слова «Программа» составить слова: грамм, рога, гора — Pascal ABC
Составить программу, которая из слова «Программа» составляет слова: грамм, рога, гора.
Код к задаче: «Из слова «Программа» составить слова: грамм, рога, гора»
Листинг программы
s1:=Copy(s,4,5);//грамм s2:=Copy(s,2,3)+s[6];//рога s3:=s[4]+s[3]+s[2]+s[6];//гора
12 голосов , оценка 4.000 из 5
Похожие ответы
- В массиве слов найти пару слов,из которых одно является обращением другого
- Составить графическую схему алгоритма и написать программу для вычисления значений переменной Y
- Составить программу, максимально используя для вычисления заданных выражений, подпрограммы типа FUNCTION
- Составьте программу для вычисления площадей трех колец
- Программа вычисления функции при заданных значениях
- Дана строка, слова разделены одним пробелом, в конце точка
- Напечатать слова, образованные нечетными элементами каждого столбца матрицы
- Разработка алгоритмов и программ с использованием методов внутренней сортировки
- Получить все различные слова заданных строк, которые начинаются с ‘a’.
- Написать программу построения графика функции y= ex ;
- Определить количество слов в строке, оканчивающихся на заданный символ
Все виды студенческих работ на заказ
Урок 6 Ввод и вывод данных Python. Функция print() Python
Источник: studassistent.ru
Составить программу которая из слова
[C++] дано слово. Из всех его букв складываются другие слова, Составить программу, которая по заданному слову из этого набора составляет следующее за ним по алфавиту.
Помогите с задачей. Условие:»Задано слово(латинскими буквами) . Из всех его букв складываются другие слова, возможно и бездумные. Составить программу, которая по заданному слову из этого набора составляет следующее за ним по алфавиту слово из этого же набора. На экран выводится заданное слово и следующее по алфавиту.»
Последний раз редактировалось ST1G; 13.02.2019 в 15:21 .
Регистрация: 17.11.2010
Сообщений: 19,042
Если в нем не очень много букв, то самый простой способ создать массив всех возможных слов, отсортировать, найти в нем исходное и выбрать следующее. Желательно букв в слове не больше 10-12
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Регистрация: 04.02.2011
Сообщений: 4,439
12! = 479.001.600 море удовольствия при составлении этой горстки слов. А уж отсортироваь. Стьюдент колледж окончит, женится, сына в армию отправит — а сортровка все идет. Эх, суперкомпьютер бы сюда ! Не перестаю удивляться больной фантазии составителей этих полезных в будущей работе задачек.
Последний раз редактировалось digitalis; 13.02.2019 в 21:47 .
Регистрация: 17.11.2010
Сообщений: 19,042
Около 6 гиг для массива в памяти многовато конечно, но вполне реально. Да и сортировка пол миллиарда слов QuickSort за вполне реальное время справится с этим, по крайней мере не часы, а десятки минут, предположительно, не проверял. А так да, хотя бы для слов из 5-6 букв сделал )
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Последний раз редактировалось Аватар; 13.02.2019 в 22:05 .
Форумчанин
Регистрация: 31.05.2009
Сообщений: 786
Тут явно нужен перебор в лексикографическом порядке. Если буквы исходного слова отсортировать, а из них уже перебирать все возможные комбинации. При этом, выделить функцию, которая бы возвращала следующее значение, то можно получить требуемый результат. Если ошибаюсь, поправьте.
Регистрация: 17.11.2010
Сообщений: 19,042
Можно и нужно. Выше же о самом простом способе, ну а не очень простой быстрей и намного. Только подумать нужно. Например так, только ТС пусть сам переводит
function NextPermutation(Text: String): String; var i,j,k,n: Integer; procedure Swap(k1,k2: Integer); var c: Char; begin c:=Text[k1]; Text[k1]:=Text[k2]; Text[k2]:=c; end; begin n:=Length(Text); for i:=n-1 downto 1 do if Text[i]Text[i]) then k:=j; Swap(i,k); for j:=1 to (n-i) div 2 do Swap(i+j,n-j+1); Result:=Text; Exit; end; Result:=»; end;
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Последний раз редактировалось Аватар; 14.02.2019 в 09:30 .
Источник: www.programmersforum.ru