Люди помогите написать программу! Опции

[ska4ai]

Уже 2 дня сижу, с массивами ниччего не пойму, как в них вводить буквы. Задача такая: задан список русских фамилий(вместе с именами и отчествами), упорядочить их по алфавиту.
Проверить, и исправить если нужно,написание собственных имён с прописных букв. Заранее всем спасибо!!!

Добавлено через 14 мин.
и ещё дополнение. Я ввожу фамилии с клавы, и сколько их я не знаю. как тут обьявлять массив?

[ska4ai]

а можно это в виде кода всё. мне нужна полностью программа

Сообщение отредактировано: ska4ai - 3.11.2008 20:19

[Rian]

а можно это в виде кода всё. мне нужна полностью программа

конечно можно

uses crt;
var
mas:array [1..20]of string[30];
i,x:integer;
count:integer;
st,st2:string[30];
begin
clrscr;
writeln('write family');
count:=0;
   repeat
   st:='';
   readln(st);
     count:=count+1;
     mas[count]:=st;

     for i:=1 to count do
     for x:=1 to count do
       if mas[x]>mas[i] then begin
       st2:=mas[x];
       mas[x]:=mas[i];
       mas[i]:=st2;
       end;

   until (st='')or(count=20);

writeln('END');
for i:=1 to count do writeln(mas[i]);

readkey;
end.

М

Почему паскалевский код небольшого размера - в аттаче? Вставляй в сообщение и обрамляй тегами, не заставляй других делать лишнюю работу и захламлять диск.. Я исправил. Lapp

[Lapp]

!

ska4ai, приведи название в соответствие с Правилами (п.4) - иначе тема будет закрыта

2 feniks25:
1. Почему ты сортируешь весь массив после ввода каждой строки? для надежности?
2. Почему в сортировке стоит полный цикл? Прежде, чем учить других, почитай сам про сортировку: Методы сортировок .
3. family <> фамилия

[Rian]

2 feniks25:
1. Почему ты сортируешь весь массив после ввода каждой строки? для надежности?
2. Почему в сортировке стоит полный цикл? Прежде, чем учить других, почитай сам про сортировку: Методы сортировок .
3. family <> фамилия

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

А с family<>фамилия я недавно на работе столкнулся, смешной был случай с немцем

ЗЫ. а ссылка полезная, основательный материал, спасибо

Сообщение отредактировано: feniks25 - 4.11.2008 16:50