1) Writeln(S); A:=A*2; readln (A,B); S:=A+B;
Обычно сначала осуществляется ввод, затем затем вычисляются значения, затем вывод. Здесь же сначала выводится S, а потом вычисляется. С переменной А тоже ерунда, сначала вычисляется значение, после чего вводится с клавиатуры.