1.d,f
2. Z=
9
A=18.
3. Смотря какой обмен минимум надо 1 максимум 2
4. C:=A;
A:=B;
B:=C;
5. 1.В присваивание переменной не указан тип
2.После end не стоит ; или .
6. Не понял,что именно задача просит
7. var a,b,c:integer;
begin
readln(a);
readln(b);
c:=a+b;
write(c);
end.
8 var a,b,c,i:integer;
begin
readln(a);
readln(b);
readln(c);
write(c);
write(b);
write(a);
end.
Я не знаю прост прошли вы циклы или нет