Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
0 / 0 / 0
Регистрация: 04.04.2019
Сообщений: 12
1

Разработать прикладное ПО

15.04.2019, 08:34. Показов 186. Ответов 2
Метки нет (Все метки)

Как эта программа будет выглядеть в Delphi...(И я знаю что там меняется ввод/вывод,но мне нужно как именно оно выглядит)

Pascal
1
2
3
4
5
6
7
8
9
10
11
Program Lime;
uses crt;
var
x,y,z:real;
begin
write('Стороны треугольника: ');
readln(x,y,z);
If (x+y>z) and (y+z>x) and (x+z>y) then
write('Данный треугольник существует.')
else write('Такого треугольника не существует.');
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.04.2019, 08:34
Ответы с готовыми решениями:

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

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

FAQ Прикладное
Эта тема - "дочка" темы: https://www.cyberforum.ru/pascal/thread250560.html > Форум программистов...

Собственное прикладное ПО
Здравсвуйте, у меня вопрос. Я хочу создавать свое прикладное программое обеспечение для windows....

2
Модератор
1276 / 869 / 206
Регистрация: 31.05.2013
Сообщений: 5,862
Записей в блоге: 6
15.04.2019, 09:03 2
Подходит раз один человек к художнику и молвит: "Как должна выглядеть картина? Дерево зеленеет, травка, озеро недалеко, птички летают в небе." Что ему должен художник ответить?

Добавлено через 1 минуту
Могу только процитировать ответ в Вашей предыдущей теме:
Цитата Сообщение от D1973 Посмотреть сообщение
А точно так и будет. Если после первой строчки добавить еще вот это:
Delphi
1
2
3
{$APPTYPE CONSOLE}
uses
 SysUtils;
Добавлено через 2 минуты

Не по теме:

А по существу, я бы кинул три Edit'а на форму, кнопочку какую-то, а вместо этого

Цитата Сообщение от MaxWinchester Посмотреть сообщение
Delphi
1
write('Данный треугольник существует.')
писал бы так:
Delphi
1
ShowMessage('Данный треугольник существует.')

0
Модератор
6798 / 4386 / 1875
Регистрация: 21.01.2014
Сообщений: 18,589
Записей в блоге: 3
15.04.2019, 09:04 3
Не, тут эти 2 строчки надо вставить вместо uses crt;
 Комментарий модератора 
MaxWinchester, еще одна тема со столь содержательным названием - будут применены санкции за нарушение п. 4.3 Правил форума! Это официальное предупреждение!
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.04.2019, 09:04

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Генерация БД и прикладное ПО
Здравствуйте. Ищу удобную среду для проектирования и генерации схемы БД. Чтобы там.... меню...

Прикладное программирование ВБА
Помогите пожалуйста При открытии своей книги,программным путём,формировать на листе2 заголовок...

C vs C++. Прикладное ПО, десктопные приложения
Здравствуйте. Есть вопрос касательно C и C++. Кто может пожалуйста, сравните эти два языка. Мне...

Системное и прикладное программирование
Вот задачи которые надо решить до завтра экзамен по системному программированию... Необходимо...


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

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

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