profil

program wczytujący imie i nazwisko i wyświetlający je odwrotnie

poleca 85% 238 głosów

Treść
Grafika
Filmy
Komentarze

program revers;
uses crt;
var imie_i_nazwisko:string;
i:integer;

begin

clrscr;

writeln('Podaj imi© i nazwisko:');

readln(imie_i_nazwisko);

for i:=length(imie_i_nazwisko) downto 1 do
begin

write(imie_i_nazwisko[i]);
end;

readln;

end.

Czy tekst był przydatny? Tak Nie