Написать программу паскаль абс вот мама выдала анне некоторую сумму денег и попросила ее купить 20 тетрадей и 5 ручек. сколько денег останется у девочки после покупки? цены и сумма денег вводятся с клавиатуры.

Var
  st,sr,kd:integer;
begin
  readln(st,sr,kd);
  if (kd>=st*20+sr*5) then writeln(kd-st*20-sr*5)
  else writeln('Анне не хватит денег');
end.