Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.79/19: Рейтинг темы: голосов - 19, средняя оценка - 4.79
0 / 0 / 0
Регистрация: 21.11.2011
Сообщений: 43
1

Найти трехзначные числа, которые при делении на 47 дают в остатке 43

22.11.2011, 19:37. Показов 3747. Ответов 7
Метки нет (Все метки)

Составить программу поиска трехзначных чисел, которые при делении на 47 дают в остатке 43, а при делении на 43 дают в остатке 47
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.11.2011, 19:37
Ответы с готовыми решениями:

Найти все числа, которые при делении на a дают остаток b, а при делении на b дают в остатке a
Ввести два натуральных числа a и b, на промежутке от 1 до N найти все числа, которые при делении на...

Вывести на экран натуральные числа от 1 до 100, которые при делении на 6 дают в остатке 4, и их количество
70. Вывести на экран натуральные числа от 1 до 100, которые при делении на 6 дают в остатке 4, и их...

Определить члены последовательности, которые при делении на 5 дают в остатке 2
Последовательность задана формулой общего члена Xn=5n2 - 4n -1. Определить (из первых двадцати)...

Переписать в файл G те элементы файла F, которые при делении на 5 дают в остатке 1 или 4
1. Создать файл F из целых чисел. Переписать в файл G те элементы файла F, которые при делении...

7
111 / 111 / 40
Регистрация: 24.02.2011
Сообщений: 325
22.11.2011, 19:39 2
Kristina T., как при делении на 43, в остатке 47 получиться может???
0
0 / 0 / 0
Регистрация: 21.11.2011
Сообщений: 43
22.11.2011, 19:42  [ТС] 3
в Учебнике Златопольский сборник задач по программированию такая задача нужно решить... сама не знаю как это
0
111 / 111 / 40
Регистрация: 24.02.2011
Сообщений: 325
22.11.2011, 19:48 4
сейчас задачник скачаю, посмотрю...номер задачи какой?
0
0 / 0 / 0
Регистрация: 21.11.2011
Сообщений: 43
22.11.2011, 19:54  [ТС] 5
2 издание. номер задачи 7.5
0
111 / 111 / 40
Регистрация: 24.02.2011
Сообщений: 325
22.11.2011, 20:09 6
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

вот прога
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
program X3;
uses crt;
var
n:integer;
b: boolean;
begin
clrscr;
for n:=100 to 999 do
  begin
    if((n mod 47)=43) and ((n mod 43)=47) then
    begin
     WriteLn(n);
     b:=true;
    end;
  end;
if not b then
 WriteLn('Takix 4isel net');
readln;
end.
но сразу понятно, что таких чисел быть не может....
1
0 / 0 / 0
Регистрация: 21.11.2011
Сообщений: 43
23.11.2011, 15:38  [ТС] 7
нужно через оператор цикла и условный оператор
0
111 / 111 / 40
Регистрация: 24.02.2011
Сообщений: 325
23.11.2011, 18:38 8
Kristina T., я вам и сделал через оператор цикла и условный оператор
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
23.11.2011, 18:38

Поиск натуральных чисел, не превышающих некоторого N, которые при делении на 43 дают в остатке 47
Составить программу поиска натуральных чисел, не превышающих некоторого N, которые при делении на...

Поиск четырехзначных чисел, которые при делении на 133 дают в остатке 125
не могу создать программу в турбо паскале поиска четырехзначных чисел, которые при делении на 133...

Найти все трёхзначные числа, которые при делении на 2 дают остаток 1
1. решила 2. Найти все трёхзначные числа, которые при делении на 2 дают остаток 1, при делении на...

Найти и напечатать числа, которые при делении на 7 дают остаток 1, 2 или 5
Даны натуральные числа от 35 до 87. Найти и напечатать те из них, которые при делении на 7 дают...


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

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

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