Topshiriq Quyidagi buyruqni bajaring vat cl interpretatorini o’rnating
sudo apt install tcl tk
Quyidagi buyruq yordamida matn fayli yarating:
sudo nano helloWorld.tcl
Yaratilgan faylga quyidagilarni yozing va saqlab, faylni yoping
#!/usr/bin/tclsh
puts "Hello World!"
Skript faylni ishga tushirish uchun quyidagi buyruqni tering
tclsh helloWorld.tcl
Topshiriq variantlari power.tcl nomi bilan fayl yaratiladi va unga quyidagi dastur kodi joylashtiriladi
proc power {base p} {
set result 1
while {$p > 0} {
set result [expr $result * $base]
set p [expr $p-1]
}
return $result
}
Har bir talabal o’z ismi bilan .tcl kengaytmali fayl yaratib, unga quyidagilarni yozadi.
#!/usr/bin/env wish -f
source power.tcl
entry .base -width 6 -relief sunken -textvariable base
label .label1 -text "to the power"
entry .power -width 6 -relief sunken -textvariable power
label .label2 -text "is"
label .result -textvariable result
pack .base .label1 .power .label2 .result -side left \
-padx 1m -pady 2m
bind .base {set result [power $base $power]; puts $result}
bind .power {set result [power $base $power]}
tclsh power.tcl wish Mansur.tcl wish yordamida faylni ishga tushirib natijani hisobot ko’rinishiga keltiradi
Laboratoriya ishi №20. Mavzu: Linux server administratsiyalash Ishdan maqsad: Linux operatsion tizimi yadrosini kompilyatsiya qilish shartlarini
o’rganish. Yadroni kompilyatsiyaga tayyorlash ishlarini bajarish.
