Форум программистов, компьютерный форум, киберфорум
Наши страницы

Delphi

Войти
Регистрация
Восстановить пароль
 
summer2011
0 / 0 / 0
Регистрация: 29.05.2011
Сообщений: 2
#1

нужно написать код в делфи - Delphi

02.06.2011, 18:56. Просмотров 512. Ответов 3
Метки нет (Все метки)

пожалуйста помогите написать код в делфи!! для этой задачи!!!

В командном первенстве по волейболу участвуют 5 команд. Известны результаты игр (количество баллов). Вывести список команд, набравших не менее N баллов. Значение N ввести с клавиатуры

заранее спасибо!!!=)

Добавлено через 4 часа 48 минут
может кто- нибудь хоть что-то написать???
очень нужна ваша помощь!!!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.06.2011, 18:56
Здравствуйте! Я подобрал для вас темы с ответами на вопрос нужно написать код в делфи (Delphi):

нужно код паскаля переписать на делфи - Delphi
program z4; var a:array of real; i,m1,p:integer; m:string; begin writeln(''); readln(m); ...

нужно написать код в Delphi - Delphi
Помогите пожалуйста!!! Дан текстовый файл, содержащий данные о доходе четырех подразделений фирмы «Феникс» за пять лет. ...

Как перевести данный код в делфи? - Delphi
имеется исходный код : $x1 = 249 //координаты верхней левой точки экрана X $y1 = 179 //координаты верхней левой точки экрана Y ...

в делфи можно написать антивирусную программу? - Delphi
подскажите пожалуйста, в делфи можно написать антивирусную программу?)

можно ли на делфи написать простейшую игру? - Delphi
можно ли написать простую игру, по типу майнкрафт\террария? или всё же для этого лучше джава? какие основные преимущества и недостатки...

как написать инженерный калькулятор в Делфи? - Delphi
Помогите плиз...с обычным справилась, а что делать с инженерным...нужна работа с памятью, короче почти все как в Windows...

3
Bright-rider
0 / 0 / 0
Регистрация: 09.07.2010
Сообщений: 40
02.06.2011, 19:06 #2
Вот пример:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
var b1,b2,b3,b4,b5,n:integer;
begin
//Вводим кол-во баллов каждой команды
...
//Вводим n
...
//Сравниваем баллы каждой команды с n
if b1>=n then
Showmessage('Команда 1');
if b2>=n then
Showmessage('Команда 2');
if b3>=n then
Showmessage('Команда 1');
if b4>=n then
Showmessage('Команда 4');
if b5>=n then
Showmessage('Команда 5');
end;
0
Sam2503
1 / 1 / 0
Регистрация: 18.05.2011
Сообщений: 9
02.06.2011, 19:13 #3
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var
a:Array[1..5] of integer; //Каждый элемент массива - команда 
n:integer;
begin
a[1]:=1//забиваем каждый элемент массива своим результатом для опр команды  
a[2]:=2
a[3]:=3
a[4]:=4
a[5]:=5
Readln(n);
if a[1]>=n then
writeln('Первая команда');
и так далее до
if a[5]>=n then
writeln('Пятая команда');
end;
Думаю как то так.
Вставь это в событие Form Activate и посмотри чего получится. Я ничего не проверял
0
Dekio
Фрилансер
Эксперт С++
5837 / 1218 / 214
Регистрация: 23.11.2010
Сообщений: 3,378
Записей в блоге: 1
02.06.2011, 21:58 #4
Цитата Сообщение от Sam2503 Посмотреть сообщение
a[1]:=1//забиваем каждый элемент массива своим результатом для опр команды a[2]:=2 a[3]:=3 a[4]:=4 a[5]:=5
Delphi
1
2
for n:=1 to 5 do
a[i]:=i;
0
02.06.2011, 21:58
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
02.06.2011, 21:58
Привет! Вот еще темы с ответами:

кто может написать программу в делфи? - Delphi
1) в поле memo вводятся целые числа по вертикали. вычислить накопленные суммы чисел(первое значение совпадает с первым числом, второе -...

Какой модуль в делфи нужно подключить для работы с объектом sys? - Delphi
Какой модуль в делфи нужно подключить для работы с объектом sys? Akmas, надо уточнить вопрос. Что имеется в виду? Что требуется сделать?

Нашел в справочке к 6-му Делфи код но он не пашет, кто пояснит почему? - Delphi
procedure TForm1.Button1Click(Sender: TObject); const InfoNum = 10; InfoStr: array of string = ('CompanyName',...

Как на делфи воспроизводить midi? В общем, хочу написать программу, которая выдаёт звуковые частоты. - Delphi
Какие компоненты и методы для этого используются?


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

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

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