Определить количество не засчитанных прыжков каждого спортсмена

@jackhp · Регистрация: 02.12.2008

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

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var
a:array[1...n,1...m] of Real;
max p: array[1...n] of Integer
i,j:Integer; nom:Integer:then
begin
 
 for i:=1 to m do
 bebegin
   max p[j]:=0
   for j:=1 to m do
   if a [i,j]=0 then max p [i]:max p [i]+;
   end;
   nom:=1
   for i: 1=to n do
   if max p[i]>max p[nom] then nom:=i;
   end.

где тут ошибка? или если не сложно напишите решение задачи:Определить количество не засчитанных прыжков каждого спортсмена

@Игорь[Igor] · 28.12.2008, 17:57

Вместо bebegin напиши правильно begin.

@jackhp · 28.12.2008, 18:00 **[ТС]**

Сообщение от Игорь[Igor]

Вместо bebegin напиши правильно begin.

ну это исправил, а прога не хочет выполнятся и на var пишет ошибку

@Игорь[Igor] · 28.12.2008, 18:14

Исправь тоже не "nom:Integer:then", а "nom:Integer;"

Добавлено через 4 минуты 15 секунд
Вообще много ошибок какие нашел убрал.

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var
a:array[1...n,1...m] of Real;
max_p: array[1...n] of Integer;
i,j:Integer;
nom:Integer;
begin
 
for i:=1 to m do
begin
max_p[j]:=0
for j:=1 to m do
if a [i,j]=0 then max_p[i]:=max_p[i]+;
end;
nom:=1
for i: 1=to n do
if max_p[i]>max_p[nom] then nom:=i;
end.

Что тут у тебя присваивается?

Code
1
max_p[i]:=max_p[i]+;

И тут что то не понятно что за условие ">".

Code
1
if max_p[i][B]&gt;[/B]max_p[nom] then nom:=i;

@jackhp · 28.12.2008, 18:14 **[ТС]**

Сообщение от Игорь[Igor]

Исправь тоже не "nom:Integer:then", а "nom:Integer;"

начинаю запускать он мне первую строчку где var написан красным цветом выделяет

@Игорь[Igor] · 28.12.2008, 18:23

Я тут уже запутался.

@jackhp · 28.12.2008, 18:25 **[ТС]**

Сообщение от Игорь[Igor]

Я тут уже запутался.

ладно забей на эту задачу может попоробуешь решить:5. Дан массив A[1..N,1..N]. Составить программу, которая прибавила бы каждому элементу данной строки элемент, принадлежащий этой строке и главной диагонали.

@Игорь[Igor] · 28.12.2008, 18:48

Диагонали две какой из них?

@jackhp · 28.12.2008, 18:57 **[ТС]**

Сообщение от Игорь[Igor]

Диагонали две какой из них?

написано же: главной

@Игорь[Igor] · 28.12.2008, 19:09

Я не знаю какая там у тебя главная диагональ. К самой диагонали ни чего не прибавляется.

Code
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
program D;
const
   N=4;
var
   A: array [1..N, 1..N] of integer;
   x, y: integer;
procedure WriteA;
begin
     for y:=1 to N do
     begin
          writeln;
          for x:=1 to N do
              write(A[x, y]:4);
     end;
end;
 
begin
randomize;
for y:=1 to N do
    for x:=1 to N do
        A[x, y]:=random(10);
WriteA;
writeln;
 
for y:=1 to N do
    for x:=1 to N do
        if x<>y then
           A[x, y]:=A[x, y]+A[y, y];
WriteA;
readln
end.

;

@ArtSklif · 02.04.2011, 01:29

Программа подсчета результатов выступления спортсменов по прыжкам с трамплина
Код C++

1
2
3
4
5
6
7
8
9

Struct sportsme +массив указателей
{ * misce [100]
Char famil [100];
Int nomer;
Intmetry;
Int baly[5];
Int suma-ochky
Uchasnyky [100]
}

1.В начале программы заполняем массив нулями, кроме номера.
2.Вводим оценки и расстояние спортсмена (выбираем любой номер.Также вводим оценки 5 судей.Задаем дополнительную кнопку [случайное число]
Расстояние: от 100 до 150 баллов: от 10 до 20.Дальше ищем наибольший и наименьший элементы массива baly и сумму трех других! Добавляем в нее результат за расстояние и получаем сумму очков.
3.Сортируем массив указателей в соответствии с суммой очков, пропуская записи с нулями.
4.Виводим HTML-файл на основе данных и порядка из массива указателей. Местом можем считать индекс массива.

Памагите плиз саздать програму!Буду очень благадарен!

Добавлено через 3 минуты
Пажалуста памагите!Я уже не знаю к каму абращятса!
Программа подсчета результатов выступления спортсменов по прыжкам с трамплина

@profid · 02.04.2011, 20:33

я так понял у тя там матрица дак на будущее она так объявляется

Delphi
1
2
var
имя:array [Диапазон1,диапазон 2] of тип;

у тебя не правильно был диапазон
промежуток обозначается ни ...
а

Delphi
1
..

и просто массивом также только диапазон один всего

Delphi
1
2
var
имя:array [Диапазон1] of тип;

Новые блоги и статьи Все статьи Все блоги /
Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ

@Игорь[Igor] 726 / 478 / 130 Регистрация: 24.12.2008 Сообщений: 3,924
	28.12.2008, 17:57
	Вместо bebegin напиши правильно begin. 0

@Игорь[Igor] 726 / 478 / 130 Регистрация: 24.12.2008 Сообщений: 3,924
	28.12.2008, 18:23
	Я тут уже запутался. 0

@Игорь[Igor] 726 / 478 / 130 Регистрация: 24.12.2008 Сообщений: 3,924
	28.12.2008, 18:48
	Диагонали две какой из них? 0

@ArtSklif 0 / 0 / 0 Регистрация: 20.03.2011 Сообщений: 9
	02.04.2011, 01:29
	Программа подсчета результатов выступления спортсменов по прыжкам с трамплина Код C++ 1 2 3 4 5 6 7 8 9 Struct sportsme +массив указателей { * misce [100] Char famil [100]; Int nomer; Intmetry; Int baly[5]; Int suma-ochky Uchasnyky [100] } 1.В начале программы заполняем массив нулями, кроме номера. 2.Вводим оценки и расстояние спортсмена (выбираем любой номер.Также вводим оценки 5 судей.Задаем дополнительную кнопку [случайное число] Расстояние: от 100 до 150 баллов: от 10 до 20.Дальше ищем наибольший и наименьший элементы массива baly и сумму трех других! Добавляем в нее результат за расстояние и получаем сумму очков. 3.Сортируем массив указателей в соответствии с суммой очков, пропуская записи с нулями. 4.Виводим HTML-файл на основе данных и порядка из массива указателей. Местом можем считать индекс массива. Памагите плиз саздать програму!Буду очень благадарен! Добавлено через 3 минуты Пажалуста памагите!Я уже не знаю к каму абращятса! Программа подсчета результатов выступления спортсменов по прыжкам с трамплина 0