8 lines
152 B
ObjectPascal
8 lines
152 B
ObjectPascal
// Ввод строки
|
|
var s: string;
|
|
|
|
begin
|
|
write('Введите Ваше имя: ');
|
|
readln(s);
|
|
writeln('Здравствуйте, ',s);
|
|
end. |