QBasic, определить последнюю цифру

Дата: Воскресенье, 16 Февраля 2014, 14:27 | Сообщение # 1

участник

Сейчас нет на сайте

Дали лабораторную,помогите кто-нибудь пожалуйста.

Задание:
Вводится натуральное число,определить оканчивается ли оно цифрой 7.

-Mikle-

Дата: Воскресенье, 16 Февраля 2014, 14:38 | Сообщение # 2

Изобретатель велосипедов

Сообщений: 198

Сейчас нет на сайте

Под рукой нет QB, как-то так:

Код

dim n as integer

input "введите число"; n
if (n mod 10) = 7 then
print "введённое число оканчивается на 7"
else
print "введённое число не оканчивается на 7"
end if

Сообщение отредактировал -Mikle- - Воскресенье, 16 Февраля 2014, 14:38

Scvad

Дата: Воскресенье, 16 Февраля 2014, 14:43 | Сообщение # 3

участник

Сообщений: 130

Сейчас нет на сайте

Цитата -Mikle- (

)

Под рукой нет QB, как-то так:

Спасибо,все правильно happy