помогите!

@Никитон · Регистрация: 13.01.2010

Студворк — интернет-сервис помощи студентам

Три друга были свидетелями ДТП. Первый заметил, что номер на-рушителя делится на 2, 7 и 11. Второй запомнил, что в записи номера участвуют всего две различные цифры, а третий – что сумма цифр рав-на 30. Определить четырехзначный номер нарушителя

вот задача ее надо решить с помощью указателей, помогиет пожалста)

@TanT · 13.01.2010, 19:14

Сообщение от Никитон

Три друга были свидетелями ДТП.

Не по теме:

ох тыж раздавленный ёж, это кто такую херню придумывает. нет бы ситуацию по радужнее придумать

@Никитон · 13.01.2010, 19:19 **[ТС]**

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses crt;
var n:word;
    a,b,c,d,s:byte;
    fk,f2:boolean;
begin
clrscr;
for n:=1000 to 9999 do
  begin
    a:=n div 1000;
    b:=n div 100 mod 10;
    c:=n div 10 mod 10;
    d:=n mod 10;
    s:=a+b+c+d;
    fk:=(n mod 2=0)and(n mod 7=0)and(n mod 11=0);
    f2:=((a=b)and(c=d)and(a<>c))or((a=c)and(b=d)and(a<>b))
        or((a=d)and(b=c)and(a<>b));
    if fk and f2 and(s=30)then
    write(n);
  end;
readln
end.

ну вот она на паскале может кому чт оскажет что

valeriikozlov · 13.01.2010, 19:36

C++
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
28
#include <iostream>
#include <windows.h>
 
using namespace std;
 
main()
{
for (int i=11;i<10000;i+=11)
{
if(i%2==0 && i%7==0)
{ int sum=0, a=i, fl1=-1, fl2=-1;
while(a>0)
{
    sum+=a%10;
    if(fl1>=0 && fl2>=0 && (a%10!=fl1 && a%10!=fl2))
        fl1=-2;
    if(fl1!=-1 && fl2==-1)
        fl2=a%10;
    if(fl1==-1)
        fl1=a%10;
    a/=10;
}
if(fl1>=0 && fl2>=0 && sum==30)
cout<<i<<endl;
}
}
return 0;
}

Добавлено через 58 секунд
Куда здесь указатели вставить? подскажете?

Новые блоги и статьи Все статьи Все блоги /
Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	[В процессе разработки] SDL3 для Web (WebAssembly): Сборка библиотек SDL3 и Box2D из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия SDL 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual. . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .	И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»

@Никитон 0 / 0 / 0 Регистрация: 13.01.2010 Сообщений: 5

	помогите! 13.01.2010, 19:07. Показов 773. Ответов 3 Метки нет (Все метки) Три друга были свидетелями ДТП. Первый заметил, что номер на-рушителя делится на 2, 7 и 11. Второй запомнил, что в записи номера участвуют всего две различные цифры, а третий – что сумма цифр рав-на 30. Определить четырехзначный номер нарушителя вот задача ее надо решить с помощью указателей, помогиет пожалста) 0