надо составить программу по паскалю)
составить программу проверяющую утверждения, что сумма цифр введенного вами числа делится на 5. 

var n:intger;begin readln(n); if n mod 5 = 0 then  writeln('Число делится на 5 без остатка') else  writeln('Число делится на 5 c остатком')end.