Синформатикой . арифметические операции в паскаль.

ответ: var x,s: integer;                                             (x*30/100)- расчёт процентов      

begin

x: =8000;

s: =x+x+(x*30/100);

writeln ('s=',s);

end,