15.4. Ispisati učitani stringa unazad. Opis programa: String se ispisuje znak po znak korištenjem naredbe LENGTH (broj znakova u stringu) i time što je s[i] definisan kao niz znakova. Ispis znak po znak se izvodi sa s[i] , a ispis u novi red naredbom Writeln. Razlika u odnosu na prethodni zadatak je u FOR petlji gdje se ćlanovi niza ispsuje od većeg ka manjem indeksu tj. unazad. Listing programa:
PROGRAM P15111014;
USES
WinCRT;
VAR
i : Integer;
s : String;
BEGIN
Write('Unesi string ');
Readln(s);
FOR i := LENGTH(s) DOWNTO 1 DO
Write(s[i]);
END.
Ispis na ekranu:
|
||||||||
|