[Ответить в тред] Ответить в тред

03/04/16 - Набор в модераторы 03.04 по 8.04
26/03/16 - Конкурс: Помоги гомункулу обрести семью!
15/10/15 - Набор в модераторы 15.10 по 17.10


[Назад][Обновить тред][Вниз][Каталог] [ Автообновление ] 17 | 7 | 5
Назад Вниз Каталог Обновить

Аноним 02/06/16 Чтв 06:47:38  128619094  
14648392587610.jpg (236Кб, 781x1022)
Аноны нужна помощь.
Нужно найти "Пятизначное число кратное 12 любые 2 цифры которого отличаются на 3"
Пик рандом.
Аноним 02/06/16 Чтв 06:49:29  128619129
14648393691000.jpg (266Кб, 799x999)
Аноним 02/06/16 Чтв 06:50:06  128619142
14648394065890.jpg (1290Кб, 2550x3300)
Аноним 02/06/16 Чтв 06:50:43  128619156
14648394435030.jpg (78Кб, 564x846)
Аноним 02/06/16 Чтв 06:52:49  128619197
14648395696750.jpg (48Кб, 618x800)
Аноним 02/06/16 Чтв 06:56:27  128619275
14648397878920.jpg (365Кб, 1394x1920)
Всё отбой сам нашёл
пик рандом
Аноним 02/06/16 Чтв 06:56:44  128619281
69636
Аноним 02/06/16 Чтв 06:58:59  128619331
>>128619281
9 - 3 = 6. Хуй тебе
Аноним 02/06/16 Чтв 07:04:22  128619457
11436
Слишком просто
Аноним 02/06/16 Чтв 07:06:43  128619510
>>128619457
Или даже 18036. Так только единожды отличие на 3 появляется
Аноним 02/06/16 Чтв 07:08:08  128619546
>>128619457
6 и 1
Аноним 02/06/16 Чтв 07:08:25  128619555
>>128619510
6 и 1
Аноним 02/06/16 Чтв 07:14:51  128619710
14648408918390.png (7Кб, 400x400)
>>128619094 (OP)
Не благодари.
var n, s, p, dt, t, sot, des, ed: integer;

Begin
Write ('n= '); Readln(n);
if n>= 10000
then begin
dt:= n div 10000;
t:= n div 1000;
sot:= n div 100;
des:= (n mod 100) div 12;
ed:= n mod 10;
s:=0;
p:=3;
s:= dt+t+sot+des+ed;
p:= dttsotdesed;
end

else Writeln('Это число не является 5-значным');
if s=p
then Writeln('s=p')
else Writeln('s<>p');
Readln;
end.
Аноним 02/06/16 Чтв 07:16:14  128619747
>>128619094 (OP)
https://ideone.com/YLsPkr
sosi pisos
Аноним 02/06/16 Чтв 07:20:56  128619870
В том и проблема что нет такого числа. предположим что одна из цифр x тогда исходя из условий задачи вторая цифра должно быть предположим х+3 или х-3. третью цифру найти невозможно т.к она будет различно хотя бы с одной из пред идущих на 6. так преподу и ответил. говорит правильно. Ебать
Аноним 02/06/16 Чтв 07:21:40  128619883
Я голову пол часа ломал и всё так просто
Аноним 02/06/16 Чтв 07:29:04  128620045
>>128619883
Ты вручную подбирал чтоли))
Аноним 02/06/16 Чтв 07:31:56  128620109
>>128620045
пришлось. формулы не работали

[Назад][Обновить тред][Вверх][Каталог] [Реквест разбана] [Подписаться на тред] [ ] 17 | 7 | 5
Назад Вверх Каталог Обновить

Топ тредов