// PascalABC.NET 3.3, сборка 1600 от 23.12.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadlnChar('Введите 1-й символ и нажмите Enter:');
var b:=ReadlnChar('Введите 2-й символ и нажмите Enter:');
var c:=ReadlnChar('Введите 3-й символ и нажмите Enter:');
var d:=ReadlnChar('Введите 4-й символ и нажмите Enter:');
var e:=ReadlnChar('Введите 5-й символ и нажмите Enter:');
Writeln(a,b,c,d,e)
end.