Даны два трехзначных числа. поменять вторые цифры этих чисел(pascal)

Question

Даны два трехзначных числа. поменять вторые цифры этих чисел(pascal)

Comments

Именно в каждом?

---

ну да.. типа в первое число поставить вторую цифру второго числа._. и аналогично во второе число..

---

Объясните подробно. Вот я ввёл два числа: 327 и 589, что куда идет

---

я так поняла учителя: должны в итоге получиться 387 и 529 на данном примере..

---

Хорошо

Answer 1

var
a,b,c: string;

begin
randomize;
writeln('Введите два трёхзначных числа:');
readln(a);
readln(b);
c:=a;
a[2]:=b[2];
b[2]:=c[2];
writeln('Ответ: ',a,' ',b);  
end.