\documentclass[a4paper,12pt]{article}
%
\usepackage[greek,english]{babel}
\usepackage[utf8]{inputenc}
\usepackage{alphabeta}
\usepackage{amsmath}
\usepackage{amsfonts}
\usepackage{listings}
\usepackage{algorithm}
\usepackage{algorithmic}
%
%
\title{Ψηφιοποιημένες Ασκήσεις Μαθηματικών}
\author{Π}
\date{\today}
%
\begin{document}
\begin{lstlisting}
english text
\end{lstlisting}
\begin{algorithm}
\caption{εύρεση μεγίστου}
\label{alg:findMax}
\begin{algorithmic}[1]
\REQUIRE $Ένας μη κενός πίνακας Α[n]$
\STATE $x \leftarrow 0$
\STATE $y \leftarrow 1$
\end{algorithmic}
\end{algorithm}
\end{document}

