Forum Programowanie c++, delphi Ostatnio aktywny: Nigdy
Nie zalogowany [Zaloguj ]
Pokaż koniec
Wersja do druku | Zapisz | Dodaj do Ulubionych   Wyślij nową wiadomość Sonda:
Autor: Temat: [PASCAL] Lancuch - szukanie znakow
animashi
Newbie
*




Postów: 1
Zarejestrowano: 15-4-2008
Offline


[*] wysłano w 15-4-2008 o godz. 15:40 Odpowiedz cytując
[PASCAL] Lancuch - szukanie znakow



Witam, mam nastepujacy problem:

Program musi znalezc dwie litery z zakresu w podanym przez uzytkownika lancuchu, ale...

Warunek:
1. Pierwsza litery pierwszego wyrazu; wystepujaca w zakresie.
2. Pierwsza litera ostatniego wyrazu; wystepujaca w zakresie.

Zakres:

const zakres=['A'..'Z','a'..'z'];

Dla:

"1. Ala ma kota "

powinnismy otrzymac: "Ak"

Przyklad:

Najprostszy mozliwy lancuch do wprowadzenia to "A A" (chyba logiczne).
Jezeli petla nie znajdzie zadnego znaku z zakresu to powinien zostac wyswietlony komunikat "brak znaków z zakresu w podanym lancuchu".

Kilka lancuchow, ktore petla musi poprawnie rozpoznac i wyprowadzic wynik:

"1. Ala ma kota "
" "
"1."
" A"
"BBB"
"ABC ABC "

Moje pomysly na wykonanie zadania:

for od poczatku do konca wprowadzonego lancuchu, if czy znak jest z zakresu, tylko nie bardzo wiem jak zrobic dalsza czesc (moze boolean).


Bardzo, bardzo, bardzo bylbym wdzieczny za pomoc. Probowalem juz kilku sposobow, ale moje wysilki zostaly spisane na straty.


Oto czesc programu, ktora moze sie przydac (tyle udalo mi sie zrobic):
Kod:

uses crt;
const zakres=['A'..'Z','a'..'z'];
var lancuch:string;
i:byte;
k:char; {zmienna ktora bedzie zawierala informacje z pierwszego warunku}
l:char; {zmienna ktora bedzie zawierala informacje z drugiego warunku

begin
clrscr;
writeln('Podaj napis:');
readln(lancuch);

for i:=1 to length(lancuch) do

begin
{nie mam pojecia co tu wpisac}
end;

writeln('Wynik warunku 1 to: ',k);
writeln('Wynik warunku 2 to: ',l);

readln;
end.
Pokaż profil użytkownika Pokaż wszystkie wiadomości użytkownika Użytkownik U2U
Wyślij nową wiadomość Sonda:


Pokaż początek

Sitemap
Copyright © 2005-2007 by coding-portal.com
Programowaniedla każdego. Programowanie w c++, java, delphi, pascal, perl oraz innych językach. Tworzenie stron w html, xhtml, php z użyciem mysql, css oraz ich pozycjonowanie. Zapraszamy do udziału w życiu naszego forum!
[zapytań: 15]
[PHP: 70.8% - SQL: 29.2%]