Старый 06.12.2010, 18:29   #1
Мастер
 
Аватар для Никола
 
Регистрация: 02.02.2010
Адрес: ЦАО
Сообщений: 779
Вес репутации: 206
Никола - прекрасное будущееНикола - прекрасное будущееНикола - прекрасное будущееНикола - прекрасное будущееНикола - прекрасное будущееНикола - прекрасное будущееНикола - прекрасное будущееНикола - прекрасное будущееНикола - прекрасное будущееНикола - прекрасное будущееНикола - прекрасное будущее
Отправить сообщение для Никола с помощью ICQ
По умолчанию Срочно нужна простая програмка на паскале!

Друзья, в универе дали, а я даже синтаксис не учил его, в пхп уперся. А тем, кто помнит его - 20 строк кода за 10 минут.

В массиве SL(20), состоящем из 5 буквенных слов, выбрать те из них, которые содержат гласную в окончании.
Остальные слова переписать в обратном порядке следования букв.
Исходный и результатный массивы распечатать.

Благодарю заранее.
Никола вне форума   Ответить с цитированием
Старый 06.12.2010, 20:30   #2
Новичок
 
Регистрация: 05.09.2008
Адрес: Украина, Донбасс
Сообщений: 84
Вес репутации: 194
MrMozg - как роза среди колючекMrMozg - как роза среди колючекMrMozg - как роза среди колючекMrMozg - как роза среди колючек
По умолчанию

Ой, как не люблю я такие условия задачи.
Цитата:
В массиве SL(20), состоящем из 5 буквенных слов, выбрать те из них, которые содержат гласную в окончании.
Остальные слова переписать в обратном порядке следования букв.
Исходный и результатный массивы распечатать.
1. Как задается массив? Вводим с клавиатуры? Или нужно написать функцию, которой массив подается в качестве параметра?
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.
MrMozg вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Срочно нужна помощь! 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, время: 04:43.