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

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

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 26.04.2016, 17:22   #1
Марта1010
 
Регистрация: 22.04.2016
Сообщений: 4
По умолчанию Задача на создание программы с использованием команды неполного вставления. Pascal

Даны три положительные числа. Выяснить существует ли треугольник с заданными сторонами. Если существует, то сумма длин двух любых сторон больше длины 3ей стороны.
Марта1010 вне форума Ответить с цитированием
Старый 26.04.2016, 17:36   #2
eoln
Старожил
 
Аватар для eoln
 
Регистрация: 26.04.2008
Сообщений: 2,689
По умолчанию

Поиск по форуму. Например, это http://programmersforum.ru/showthread.php?t=233187
Изменить под Паскаль не трудно. Если трудно, то искать по форуму дальше. Таких задач много
eoln вне форума Ответить с цитированием
Старый 26.04.2016, 17:59   #3
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

имхо, проще написать, чем чужое адаптировать
Код:
var a,b,c : integer;
begin
  repeat
   WriteLn('Введите три целых положительных числа: ');
   ReadLn(a,b,c);
  until (a>0) and (b>0) and (c>0);

  if ((a+b)>c) and ((a+c)>b) and ((b+c)>a) 
  then WriteLn('Треугольник существует')
  else WriteLn('Треугольник не существует');

end.
Serge_Bliznykov вне форума Ответить с цитированием
Старый 26.04.2016, 18:16   #4
NetSpace
Участник клуба
 
Аватар для NetSpace
 
Регистрация: 03.06.2009
Сообщений: 1,792
По умолчанию

если речь идёт о неевклидовом пространстве, а, скажем, о сферической системе координат, то там можно и без проверок. там может существовать треугольник со сторонами 2см, 4см и 58 см.
Программирование - это единственный способ заставить компьютер делать то, что тебе хочется, а не то, что приходится.
NetSpace на форуме Ответить с цитированием
Старый 26.04.2016, 18:35   #5
Марта1010
 
Регистрация: 22.04.2016
Сообщений: 4
По умолчанию

Я понимаю, что это очень тупой вопрос, но никогда Паскаль не пользовалась. Так и писать (Введите три положительных числа) Или мне нужно вводить числа?
Марта1010 вне форума Ответить с цитированием
Старый 26.04.2016, 19:56   #6
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

Все поняли, что такое команда неполного вставления? Просветите
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 26.04.2016, 23:31   #7
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Сообщение от Аватар Посмотреть сообщение
Все поняли, что такое команда неполного вставления? Просветите
я даже не пытался понять это. Это выше моего понимания!
Serge_Bliznykov вне форума Ответить с цитированием
Старый 26.04.2016, 23:59   #8
BDA
МегаМодератор
СуперМодератор
 
Аватар для BDA
 
Регистрация: 09.11.2010
Сообщений: 7,285
По умолчанию

Наверное, имелось ввиду неполное ветвление
Изображения
Тип файла: png akinator.png (43.6 Кб, 83 просмотров)
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )

Последний раз редактировалось BDA; 27.04.2016 в 03:14.
BDA на форуме Ответить с цитированием
Старый 27.04.2016, 00:55   #9
Dvoishnik
Форумчанин
 
Регистрация: 12.02.2011
Сообщений: 808
По умолчанию

Цитата:
Сообщение от Марта1010 Посмотреть сообщение
Я понимаю, что это очень тупой вопрос, но никогда Паскаль не пользовалась. Так и писать (Введите три положительных числа) Или мне нужно вводить числа?
что хотите пишите WriteLn(параметр); это функция для вывода на экран
Терпение!Дежурный экстрасенс скоро свяжется с вами!
Dvoishnik вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Создание программы на С++ с использованием библиотеки Femap Papier Фриланс 3 29.08.2016 20:57
Delphi создание программы с использованием модулей sunni_girl91 Помощь студентам 1 22.12.2012 10:28
Задача с использованием Case. PASCAL Mozli Помощь студентам 1 12.11.2011 09:01
[B]Разработка программы из использованием процедур (Pascal)[/B] bot0 Помощь студентам 0 18.01.2011 22:37
Разработка программы из использованием процедур (Pascal) bot0 Помощь студентам 0 16.01.2011 20:11