Паскаль. Тип данных строка символов. Напишите программу, которая заменяет символ "А" символом "*"

Program Program1;var a :integer;beginwriteln('введите число');Readln(a);a=*;writeln('исходное число', a);end.