Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Столбец с наибольшей суммой Матрица Помогите с решением . Необходимо задать матрицу A 10*10 , найти наибольшую сумму элементов столбцов , вывести номер столбца с наибольшим значением суммы . https://www.cyberforum.ru/ turbo-pascal/ thread1321990.html Turbo Pascal Наибольшее значение ряда чисел
Помогите с двумя задачами , буду премного благодарен . По первой второй есть вот такие мысли , но не уверен : write('Введите длину массива : ');readln(n); for i:=1 to n do ...
Turbo Pascal Значение функции по одной из функции в зав от переменной https://www.cyberforum.ru/ turbo-pascal/ thread1321983.html
Решение функции в зависимости от переменной , помогите сделать :) z=8y2-k, где y вычисляется по одной из формул: y=\begin{cases}x^2&\text{, }k=1\\\\x^2-3&\text{, }k=2\\\\x-0.5&\text{,...
Turbo Pascal Определить, есть ли в этом массиве три числа, сумма которых равна нулю Дан массив из N целых чисел а1, а2...an. Вам нужно проверить, есть ли в этом массиве три числа сумма которых равна нулю. В ответе нужно написать только "YES", иначе "NO". Пример: Дано ... https://www.cyberforum.ru/ turbo-pascal/ thread1321974.html
Ищу ошибку с модуле Turbo Pascal
Здравствуйте. Помогите найти ошибку в модуле. Суть программы : 2 процедуры отвечают за ввод матриц, 3 процедура высчитывает их произведение. Это - раздел описания переменных в начале...
Turbo Pascal Выяснить, является ли один из массивов подмножеством другого https://www.cyberforum.ru/ turbo-pascal/ thread1321823.html
будьте добры помочь Даны два целочисленных массива. Выяснить, является ли один из них подмножеством другого. Если является, то упорядочить это подмножество по убыванию.
Turbo Pascal Освоение графики TP https://www.cyberforum.ru/ turbo-pascal/ thread1321701.html
Здравствуйте. Начал осваивать графику в паскале и не совсем понял : как вставить модуль с графикой в саму программу? Unit zast; interface uses GRAPH; procedure zastavka; IMPLEMENTATION...
Строки и тип Turbo Pascal
Подскажите, как исправить ошибку. Задача Пусть текст представляет собой последовательность строк. На каждой строке находится имя, фамилия и отчество. Распечатайте все отчества. по алфавиту, а...
Turbo Pascal Найти в массиве самую длинную цепочку чисел, упорядоченных по возрастанию Создать программу, которая находит в этом массиве самую длинную цепочку чисел, упорядоченных по возрастанию. https://www.cyberforum.ru/ turbo-pascal/ thread1321570.html Turbo Pascal Построить математическую модель https://www.cyberforum.ru/ turbo-pascal/ thread1321525.html
program Project2; type ras = record num: integer; nap: string; time1: string; time2: string; days: string; end;
Создайте множество, содержащее все простые числа из диапазона Turbo Pascal
Создайте множество, содержащее все простые числа из диапазона .
Turbo Pascal Определить, гласных или согласных букв в слове больше Дано предложение. Используя множества, определить, гласных или согласных букв в последнем слове больше. https://www.cyberforum.ru/ turbo-pascal/ thread1321466.html
Фрилансер
3413 / 2810 / 3000
Регистрация: 08.02.2012
Сообщений: 8,208
Записей в блоге: 1
07.12.2014, 10:12 0

Для заданного числа n определите делится ли оно на 9, используя признак делимости - Turbo Pascal - Ответ 6952152

07.12.2014, 10:12. Показов 2540. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Alexandra0 как решение

Решение

Цитата Сообщение от Alexandra0 Посмотреть сообщение
для заданного числа n определите делится ли оно на 9, используя признак делимости.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
Var s,n:longint;
Begin
    write('N: ');
    readln(n);
    n:=abs(n);
    While n>0 do
    Begin
      s:=s + n mod 10;
      n:=n div 10;
    End;
    writeln(s mod 9 = 0);
    readln;
End.


Вернуться к обсуждению:
Для заданного числа n определите делится ли оно на 9, используя признак делимости Turbo Pascal
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
07.12.2014, 10:12
Готовые ответы и решения:

Дано натуральное число n, проверить, кратно ли оно 11 используя признак делимости на 11
Помогите задачу решить: Дано натуральное число n, проверить, кратно ли оно 11 используя признак...

Проверить признак делимости на 3 на примере заданного числа
Известно, что число делится на 3 , когда сумма его цифр делится на 3. Проверить этот признак на...

Проверить признак делимости на 11, и вывести числа кратные 11, не превосходящих заданного m
Помогите пожалуйста: Число делится на 11, если разность между суммой цифр, стоящих на нечётных...

Известно, что число делится на три тогда и только тогда, когда сумма его цифр делится на три. Проверим этот признак для заданного трехзначного числа X
Известно, что число делится на три тогда и только тогда, когда сумма его цифр делится на три....

1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
07.12.2014, 10:12

Число делится на 11, проверить признак для натуральных чисел, не превосходящих заданного m, вывести числа кратные 11
Число делится на 11, если разность между суммой цифр, стоящих на нечетных местах, и суммой цифр,...

Для четного введенного числа определить, делится ли оно на 10, для нечетного - делится ли оно на 5
вечер добрый,помогите с програмкой на с++ условие:с клавиатуры вводиться целое число,для четного...

Для натуральных чисел, не превосходящих заданного k, проверить признак делимости на 9
Помогите с решением задачки на C, никак не могу понять, заранее благодарю. Буду благодарен даже...

Кратно ли число одиннадцати, используя признак делимости на 11
Надо написать программу на паскале, с использованием функций(процедур) и массивов! Дано...

Кратно ли число трем, используя признак делимости на 3.
Дано натуральное число P. Проверьте, кратно ли Р трем, используя признак делимости на 3....

Проверить, кратно ли р девяти, используя признак делимости на девять
Мне срочно необходимо решение этой задачи пожалуйчта помогите мне... Дано натуральное число p....

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.