打卡信奥刷题(188)用Scratch图形化工具信奥P7938 [普及组][COCI2007-2008#5] PASCAL

[COCI2007-2008#5] PASCAL

题目描述

小 Frane 已经十年级了,但是在信息课上学习 Pascal 仍然很吃力。老师写下了如下的 Pascal 程序作为家庭作业,他需要根据输入的整数 N N N 来判断程序的输出。

readln(N);
counter := 0;
for i := N-1 downto 1 do begin
	counter := counter + 1;
	if N mod i = 0 then break;
end;
writeln(counter); 

请您编写一个程序来解决这个问题。

输入格式

一行,一个整数 N N N

输出格式

一行,表示以上程序的输出结果。

样例 #1

样例输入 #1

1

样例输出 #1

0

样例 #2

样例输入 #2

10

样例输出 #2

5

样例 #3

样例输入 #3

27

样例输出 #3

18

提示

对于 100 % 100\% 100% 的数据, 1 ≤ N ≤ 1 0 9 1\le N\le10^9 1N109

本题分值按照原比赛设置,满分 30 30 30 分。

Scratch实现

在这里插入图片描述

后续

接下来我会不断用scratch来实现信奥比赛中的算法题、Scratch考级编程题实现、白名单赛事考题实现,感兴趣的请关注,我后续将继续分享相关内容

  • 4
    点赞
  • 5
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值