Написать программу Паскаль, которая б  вычисляла сумму процентов начисленных в банке под 18% на срок - 1 год.
Входные данные: сумма.
Выходные данные: сумма процентов.

vars,a:real;beginwrite('введите сумму ');readln(a);s:=a*18/100;writeln('сумма процентов ', s);end.