Добавил:
deadpigeon
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:lab3 / lr3_1
.tcl #!/usr/bin/env tclsh
set a 10
# a
set b "\{$a\}\{ "
puts "$b"
# b
set b "$a\{ #[set c 14]"
puts "$b"
# c
set b "{$a}\{ #\[set c 14\]"
puts "$b"
# d
set b "\$a\{ #[set c 14]"
puts "$b"
# e
set b "{$a}\{ #[set c 14]"
puts "$b"
# f
set b "\{\$a\}\\\{ #\[set c 14\]"
puts "$b"
# d
set b "\{\$a\}\{ #[set c 14]"
puts "$b"
set a 10
# a
set b "\{$a\}\{ "
puts "$b"
# b
set b "$a\{ #[set c 14]"
puts "$b"
# c
set b "{$a}\{ #\[set c 14\]"
puts "$b"
# d
set b "\$a\{ #[set c 14]"
puts "$b"
# e
set b "{$a}\{ #[set c 14]"
puts "$b"
# f
set b "\{\$a\}\\\{ #\[set c 14\]"
puts "$b"
# d
set b "\{\$a\}\{ #[set c 14]"
puts "$b"