Цитата (Русаков)
Найти сумму цифр двузначного числа
m:=x mod 10; (разряд единиц)
n:=x div 10; (разряд десятков)
s:=m+n;
Цитата (Тупые герои рекламных роликов)
- Папа! А на Pascal'е сейчас кто-то программирует?
- Нет, сынок, это фантастика...
Можно сократить количество строк кода и выделение памяти под переменные, выведя в последней строке вместо переменных m и n их выражения:
s:= x mod 10 + x div 10
А вообще, берите PascalABC и не парьтесь: практических заданий (типа Робот или Чертежник) на четверть хватит точно! А для шибко резвых деток сразу ставьте PascalABC.NET - там заданий больше
