Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
6 / 7 / 0
Регистрация: 01.04.2010
Сообщений: 289

Работа с отрезкам

08.03.2011, 20:55. Показов 1141. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем hello!!!))) Помогите разаработать программку дан натуральный отрезок чисел [A,B]. Найти те числа этого отрезка, которые при делении на данное число K, дают в остатке число 4. Проверку, равен ли остаток четырем при делении данного числа на K, сделать с помощью процедуры пользователя??))) Зарание благодарен!!!))))
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
08.03.2011, 20:55
Ответы с готовыми решениями:

Фильтрация по нескольким отрезкам диапазона
Здравствуйте, уважаемые. Нужна ваша помощь вот какого формата: Есть таблица в excel, по первому столбцу, необходимо выполнить...

Как заштриховать фигуру построенную по отрезкам
Собственно вопрос в название, как заштриховать фигуру построенную по отрезкам? Пример построения моего прямоугольник с закругленными...

Построение плоскости по отрезкам [GLSL, геометрический шейдер]
В геометрический шейдер прилетает отрезок с координатами точек X1 и X2, у каждой точки есть свой вектор нормали N1 и N2 (они лежат в одной...

5
 Аватар для Cegou
37 / 32 / 9
Регистрация: 04.03.2011
Сообщений: 120
08.03.2011, 21:11
Что за процедура пользователя? mod уже не тот?))
1
6 / 7 / 0
Регистрация: 01.04.2010
Сообщений: 289
08.03.2011, 21:15  [ТС]
просто через процедуру
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
09.03.2011, 12:51
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
uses crt;
procedure Chisla(a,k:integer;var f:boolean);
begin
f:=a mod k=4;
end;
var a,b,i,k,j:integer;
    f:boolean;
begin
repeat
writeln('Введите диапазон натуральных чисел');
read(a,b);
if (a<1)or(b<=a) then writeln('Диапазон введен неверно, повторите ввод');
until(a>0)and(b>a);
write('Введите число для деления k=');
readln(k);
writeln('Числа с остатком 4 при делении на число ',k);
for i:=a to b do
 begin
  Chisla(i,k,f);
  if f then
   begin
    j:=1;
    write(i,' ');
   end;
 end;
if j<>1 then write('Таких чисел нет');
end.
1
0 / 0 / 0
Регистрация: 10.09.2014
Сообщений: 20
15.11.2014, 20:24
Можете перевести код этой задачи в СИ?
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
15.11.2014, 20:26
Если я, то нет.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
15.11.2014, 20:26
Помогаю со студенческими работами здесь

Распределение случайных величин по отрезкам в заданном интервале
Приветствую! Только начал знакомиться с Фортраном, есть задача, хотелось уточнить алгоритм. Итак, задача: Область от Xmin до Xmax...

Определить, сколько чисел принадлежит заданным отрезкам
В текстовом файле числа от -2 до 2, нужно чтобы программа перебирала этот отрезок с заданным шагом и выводила количество чисел, которые...

Проверить, принадлежат ли числа заданным отрезкам на числовой прямой
Написать программу вводящую 2 числа и определяющую,содержат ли отрезки и (10,20) по одному из этих чисел.Заранее благодарен Я в...

Заданы N отрезков с координатами концов. Принадлежность точки отрезкам.
Вообщем не пойму саму суть определения... const n=3; var i,x,k:integer; a,b:array of real; begin for i:=1 to n do begin ...

Если можно построить треугольник по трем данным отрезкам, то вычислить его периметр и площадь
Даны длины трех отрезков a, b, c. Если можно построить треугольник по этим трем отрезкам, то вычислить его периметр и площадь.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru