Hogy tudnék ilyen programot írni Pascal-ban?

...

Minek?

Milyen platformra szeretnéd írni?

A leggyorsabb megoldás windows alá egy system procedúrával/függvénnyel meghívni a "shutdown -s -t 0" parancsot.

Linux alá lehet hasonló, csak ott "shutdown -h -P now" lesz a parancs. (Ha jól emlékszem, de a "shutdown --help" kiírja. itt su jog kell a futtatáshoz.

Ezt egy egyszeru batch file-al konnyebben meglehet oldani...

@echo off

echo Your PC will shutdown in 30 seconds! Press CTRL+C to abort.

ping -n 31 127.0.0.1>nul

shutdown /s

ezt belerakod egy .bat fajlba es futtatod...