Информатика 8 класс Босова

Напишите программу на языке Паскаль для нахождения количества купюр для выдачи в банкомате

k500,k100,k50,k10 - переменные целого типа

x - переменная целого типа

для ввода используется команда read( );

для целочисленного деления используется операция  div

для нахождения остатка от деления используется операция  mod

k500:=s div 500;

s:=s mod 500;

k100:=s div 100;

s:=s mod 100;

k50:=s div 50;

s:=s mod 50;

k10:=s div 10;

для вывода ответа используется команды  writeln('500 - ',k500); 

 writeln('100 - ',k100);  writeln('50 - ',k50);  writeln('10 - ',k10); 

после окончания программы пишем end.