Проверить кратность трем - Паскаль, Turbo Pascal, PascalABC.NET

Anita_i · 11.05.2008, 10:03

Ребят, помогите пожалуйста

Дано натуральное число, как проверить кратно ли оно трем?

-=<[Evklidd]>=- · 11.05.2008, 10:09

Вот такой проверкой
if (n mod 3) = 0 then
writeln('N - kratno 3');

Anita_i · 11.05.2008, 10:14

Спасибо большое

11.05.2008, 10:03	#1
Anita_i Регистрация: 11.05.2008 Сообщений: 9	Проверить кратность трем Ребят, помогите пожалуйста Дано натуральное число, как проверить кратно ли оно трем?

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Проверить тип переменной	satana	Общие вопросы Delphi	10	20.11.2010 21:43
Как проверить строку?	nikleb	PHP	6	07.07.2008 22:04
Паскаль. найти все числа кратные трем и посчитать их количество	__k1ll3r__	Помощь студентам	6	02.04.2008 16:37

11.05.2008, 10:09	#2
-=<[Evklidd]>=- Форумчанин Подтвердите свой е-майл Регистрация: 22.01.2008 Сообщений: 161	Вот такой проверкой if (n mod 3) = 0 then writeln('N - kratno 3');

11.05.2008, 10:14	#3
Anita_i Регистрация: 11.05.2008 Сообщений: 9	Спасибо большое