Составьте программу, удваивающую значение целой переменной "а", если а>5.
Var a: integer; begin readln(a); if (a>5) then a:=a*2; writeln(a); readln(); end.