Do napisania są dwa programy w pascalu (delphi).

1.Napisz funkcję i program ją wykorzystujący, która zamieni wielkie litery na małe. Nie korzystaj z gotowej wbudowanej funkcji.

2.Stosując procedury i funkcje wczytaj nazwisko i sprawdź czy jest napisane dużymi czy małymi literami. (dodatkowo) Wykonaj to zadanie wielokrotnie, wykorzystując instrukcję repeat lub while.
Z góry dzięki :)

1

Odpowiedzi

  • d2b
  • Początkujący
2009-12-17T23:17:51+01:00
Zad 1 .
Robisz 2 Edity.

case strtoint(edit2.text) of
a..z: edit1.Text:=edit2.Text;
A: edit1.Text:='a';
B: edit1.Text:='b';
C: edit1.Text:='c';
D: edit1.Text:='d';
E: edit1.Text:='e';
F: edit1.Text:='f';
end;

Ja bym to w taki sposób zrobił ;]