Определить является ли число целым и оканчивается ли оно цифрой 7

22.08.2011, 09:15. **Показов** 5226. **Ответов** 2

Author24 — интернет-сервис помощи студентам

Доброго времени суток! Помогите пожалуйста решить задачку.
Дано целое число. Определить является ли оно целым и оканчивается ли оно цифрой 7.
Решение:
Текст программы

QBasic/QuickBASIC

CLS
INPUT "Введите число N="; N
IF INT(N) = N THEN 10 ELSE 20
10 PRINT "Число N - целое"
END
20 PRINT "Число N - не является целым"
END

Первую часть я вроде бы сделала.
А вот с окончанием на 7 у меня проблема. Помогите, пожалуйста!

@softmob · 22.08.2011, 10:13

QBasic/QuickBASIC

1	IF a MOD 10 = 7 THEN PRINT "okanchivaetsja na 7" ELSE PRINT "net"

только зачем проверять целое ли число, если по условию

Дано целое число.

22.08.2011, 10:36

Спасибо. Видимо условие не корректно записано, а я читала просто как "дано число"......В любом случае, спасибо большое.

tlyashok
	22.08.2011, 10:36	3
	Спасибо. Видимо условие не корректно записано, а я читала просто как "дано число"......В любом случае, спасибо большое.