#!/usr/bin/perl -w
use diagnostics;
@liste = <STDIN>;
@revListe = ();
while(@liste) {
  $item = pop @liste;
  push @revListe, $item;
}
print @revListe;