Составить программу на языке паскаль для вычисления Х процентов от числа С.

var x, c:integer;a:real;beginwrite('Введите число: ');readln(c);write('Введите количество процентов: ');read(x);writeln('%');a:=c/100*x;writeln('Ответ: ',x,'% от числа ',с,' равно ',a);end.