小玉买文具程序加题解

     小玉买文具

 

题目描述

班主任给小玉一个任务,到文具店里买尽量多的签字笔。已知一只签字笔的价格是19角,而班主任给小玉的钱是ab角,小玉想知道,她最多能买多少只签字笔呢。

输入输出格式

输入格式:

输入的数据,在一行内,包括两个整数,依次表示aba<=10000,b<=9

输出格式:

输出一个整数,表示小玉最多能买多少只签字笔。

输入输出样例

输入样例#1

10 3

输出样例#1

 

5

 

程序如下:

var

  i,j,k,n,m:longint;

begin

  readln(n,m);//几元几角。

  k:=n*10+m;//全部转换成角为单位的前

  k:=k div 19;//十九角买一只笔。

  writeln(k);//输出。

end.

你可能感兴趣的:(pascal,NOIP2016)