Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.88/8: Рейтинг темы: голосов - 8, средняя оценка - 4.88
 Аватар для NSLANDE
14 / 14 / 7
Регистрация: 11.12.2010
Сообщений: 42

Билеты

26.09.2011, 21:26. Показов 1618. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Ребят очень нужна помощь, а то сам никак не могу разобраться. Вообщем нужно понять почему L выводит результат 2, а не 1, на конкретном примере: n=2; массив=431256. И так в строки я ищу мин значение, если мин по j=1 тогда переходим на следующую строку, если 2, тогда переходи через одну, а если 3, тогда через 2 и дальше считаем мин значение. В моем случае и примере мин значение по j=3, а строк всего две, значит L должно присвоиться значение 1 и вывести ее, а у меня выводит 2. Объясните плиз почему и помогите правильно решить. Заранее спасибо.
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
28
29
30
31
32
var
  i,j,n,k,l,min,p:integer;
  a:array[1..100,1..100]of integer;
begin
  readln(n);
  writeln('massiv=');
  for i:=1 to n do
  for j:=1 to 3 do
    readln(a[i,j]);
  k:=0;
  min:=a[1,1]+1;
  L:=0;
  for i:=1+k to n do
    begin
      for j:=1 to 3 do
        begin
          if min>a[i,j]then
            begin
              min:=a[i,j];
              p:=j;
              if p=1 then k:=0;
              if p=2 then k:=1;
              if p=3 then k:=2;
              writeln('min=',min);
            end;
        end;
      L:=L+min;
      writeln('L=',L);
    end;
  min:=35000;
  writeln('L=',L);
end.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
26.09.2011, 21:26
Ответы с готовыми решениями:

Определите те билеты, номера которых являются «счастливыми»
6.Пусть даны N шестизначных номеров толлейбусных билетов — ХХХХХХ. Определите те билеты,номера которых являются «счастливыми»,то есть сумма...

Выведите два числа — номера мест, билеты на которые стоит купить девочкам
:cry: Саша и Лиза — две самые обычные девочки, которые живут в Москве и очень любят Санкт-Петербург. На каникулы они запланировали...

Счастливые билеты
Помогите пожалуйста.Обыскал весь форум но вроде такой именно задачи не было; НАЙТИ СУММУ НОМЕРОВ всех счастливых билетов(6-ти значное...

1
46 / 46 / 36
Регистрация: 18.10.2010
Сообщений: 212
30.09.2011, 04:37
что у тебя задача должна делать???? а потому уже посмотрим!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
30.09.2011, 04:37
Помогаю со студенческими работами здесь

Трамвайные билеты
Cоставить программу подсчета количества ((счастливых)) трамвайных билетов . Билет называется счастливым , если сумма первых трех цифр...

Счастливые билеты
Помогите решить)) Имеется часть катушки с автобусными билетами. Номер билета шестизначный. Составить программу, определяющую количество...

Билеты по программированию
Добрый день.Ребят не могли бы вы помочь решить задачки : 1)Найти все нечетные делители заданного числа. 2)Напечатать все простые числа...

Счастливые билеты.
Билет называют «счастливым», если в его номере сумма первых трех цифр равна сумме последних трех. Подсчитать число тех «счастливых»...

Лотерейные билеты
Пусть таблица выигрышей лотереи представлена в виде двух массивов a1,a2...an и c1,c2...cn (n-некоторая константа) так, что натуральные...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
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 и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru