Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 09.10.2009, 19:42   #1
Konstantin1706
Пользователь
 
Регистрация: 02.03.2009
Сообщений: 32
По умолчанию Максимальное из 3 цифр

Здравствуйте форумчане... Мне была поставлена задача найти максимальное из 3 цифр. Но почему-то проект не запускается, вот код
var
a,b,c:Integer;
begin
a:=StrToInt(Edit1.Text);
b:=StrToInt(Edit2.Text);
c:=StrToInt(Edit3.Text);
if (a>b) and (a>c) then Edit4.Text:='max a'
else
if (b>a) and (b>c) then Edit4.Text:='max b'
else
if (c>a) and (c>b) then Edit4.Text:='max c';
end;
Помогите пожауйста, заранее спасибо
Konstantin1706 вне форума Ответить с цитированием
Старый 09.10.2009, 19:47   #2
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,210
Счастье

Странно, у меня запустился
Вложения
Тип файла: zip проект.zip (3.2 Кб, 6 просмотров)
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Старый 09.10.2009, 19:53   #3
Konstantin1706
Пользователь
 
Регистрация: 02.03.2009
Сообщений: 32
По умолчанию

все, спасибо, я сам напутал)
Konstantin1706 вне форума Ответить с цитированием
Старый 09.10.2009, 20:15   #4
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,210
По умолчанию

+ тогда ставь . Сорри за оффтоп
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Максимальное значание. Делфи Степа Верхозин Помощь студентам 2 13.05.2009 15:39
Максимальное кол-во одинаковых символов MAKEDON Общие вопросы C/C++ 1 11.04.2009 16:23
Натуральное число, в записи которого п цифр, называется числом Армстронга, если сумма его цифр, возведенн OTLi4HO Общие вопросы C/C++ 6 14.01.2009 19:48
Найти максимальное число.Паскаль. Karabas Паскаль, Turbo Pascal, PascalABC.NET 2 16.12.2008 21:13
Максимальное значение по дате ZUZA Microsoft Office Excel 5 05.07.2008 19:30