06.12.2010, 18:29 | #1 |
Мастер
|
Срочно нужна простая програмка на паскале!
Друзья, в универе дали, а я даже синтаксис не учил его, в пхп уперся. А тем, кто помнит его - 20 строк кода за 10 минут.
В массиве SL(20), состоящем из 5 буквенных слов, выбрать те из них, которые содержат гласную в окончании. Остальные слова переписать в обратном порядке следования букв. Исходный и результатный массивы распечатать. Благодарю заранее. |
06.12.2010, 20:30 | #2 | |
Новичок
Регистрация: 05.09.2008
Адрес: Украина, Донбасс
Сообщений: 84
Вес репутации: 195
|
Ой, как не люблю я такие условия задачи.
Цитата:
2. Что значит "выбрать те из них" - их учитывать отдельно раньше остальных или вообще не учитывать? Ниже код-решение задачи как я понял ее условие. Массив вводится с клавиатуры, на экран выводится вначале исходный массив, а затем - результат. В результате учитываем только те слова, которые не содержат гласной в окончании - они выводятся в обратном порядке следования букв. Учитываю только латинские гласные буквы. Если нужны также русские - добавьте их в множество. Если условие подразумевает что-то другое - уточните, исправлю код: Код:
const n=20; var sl:array[1..n] of string[5]; i,j:integer; begin //Заполняем массив for i:=1 to n do readln(sl[i]); //Выводим результат: writeln('Исходный массив:'); for i:=1 to n do writeln(sl[i]); writeln('Результат:'); for i:=1 to n do if not(sl[i][5] in ['a','e','i','o','u','y']) then begin for j:=5 downto 1 do write(sl[i][j]); writeln; end; end. |
|
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Срочно нужна помощь! DLE – RSS | awe | Курилка | 8 | 04.07.2015 02:36 |
Нужна помощь срочно!!!!!! | noggano77777 | Курилка | 10 | 29.04.2010 03:14 |
Нужна простая прога для конверта видео | omnislash | Курилка | 13 | 16.12.2009 03:26 |
Срочно нужна помощь!!! | SeregaSV | Курилка | 15 | 26.10.2009 22:45 |
Срочно нужна помощь | Kaif | Курилка | 31 | 28.01.2009 07:57 |
Часовой пояс GMT +3, время: 00:46.