Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
-25 / 0 / 0
Регистрация: 23.10.2014
Сообщений: 99
1

Вывести одну гласную латинскую букву из первой строки, две из второй, ... i гласных латинских букв из строки н

18.11.2015, 20:40. Просмотров 1005. Ответов 1
Метки нет (Все метки)

Разработать функцию MakeStr(S:string; N:integer):string, возвращающую строку из N первых гласных латинских букв строки S (либо из всех гласных латинских букв данной строки, если их меньше N). Вводится набор строк. Вывести одну гласную латинскую букву из первой строки, две из второй, ... i гласных латинских букв из строки номер i. Гласными считаются следующие буквы: aeiouyAEIOUY.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.11.2015, 20:40
Ответы с готовыми решениями:

Из второй строки вывести слово, содержащее хотя бы одну гласную букву из заданного слова первой строки
Даны две строки s1 и s2. Для слова w строки s1 вывести слово строки s2, которая содержит хотя бы...

Определить, каких гласных латинских букв нет ни в первой, ни во второй строках
Вводятся 2 строки. Определить, каких гласных латинских букв нет ни в первой, ни во второй строках.

Ввести две символьных строки. Выполнить поиск второй строки в первой и вывести номер позиции первой строки, с которой вторая строка содер-жится в ней
Ввести две символьных строки. Выполнить поиск второй строки в первой и вывести номер позиции первой...

Ввести две символьных строки. Выполнить поиск второй строки в первой и вывести номер позиции, с которой вторая строка содержится в первой.
Ввести две символьных строки. Выполнить поиск второй строки в первой и вывести номер позиции, с...

1
Модератор
Эксперт Pascal/Delphi
6163 / 4161 / 4563
Регистрация: 05.06.2014
Сообщений: 20,460
21.11.2015, 11:23 2
Лучший ответ Сообщение было отмечено EdinDzeko как решение

Решение

(C) Найдено в интернете и доработано.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
{Разработать функцию MakeStr(S:string; N:integer):string, возвращающую строку 
из N первых гласных латинских букв строки S (либо из всех гласных латинских букв 
данной строки, если их меньше N). }
function MakeStr(S: string; N: Integer): string;
var
  r: string;
const
  g = 'aeiouyAEIOUY';
begin
  r := '';
  while (n > 0) and (length(s) > 0) do
  begin
    if pos(s[1], g) <> 0 then
    begin
      r := r + s[1];
      dec(n);
    end;
    delete(s, 1, 1);
  end;
  MakeStr := r;
end;
 
var
  n, j: integer;
  s: string;
 
begin
  readln(n);
  for j := 1 to n do
  begin
    readln(s);
    writeln('Result: ', MakeStr(s, j));
  end;
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.11.2015, 11:23

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Чередование букв первой и второй строки с удалением одинаковых гласных
построить функцию на вход -две строки на выводе-одна строка, которая получается чередованием букв...

Сгенерировать две произвольные строки и определить, является ли какое-либо слово первой строки частью второй строки
Сгенерировать две произвольные строки и определить, является ли какое-либо слово первой строки...

Составить строку из первых n1 букв первой строки + последних n2 букв второй строки (Pascal -> Python)
я нашел программу на паскале, надо перевести ее на python, непонятно только 16 строка program...

Ввести строку, состоящую из латинских букв. Заменить каждую букву строки на букву, следующую за ней по алфавиту
Ввести строку, состоящую из латинских букв. Заменить каждую букву строки на букву, следующую за ней...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.