Даю80 балловСрочно!!! Даны три числа A B C необходимо вычислить и вывести на печать все числа больше пяти

var a,b,c: integer;

begin

readln (a,b,c);

if a>5 then writeln (a);

if b>5 then writeln (b);

if c>5 then writeln (c)

end.