![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 31.05.2010
Сообщений: 21
|
![]()
Помогите пожалуйста сделать блок-схему к задаче....
Составьте программу, которая определяла бы вид треугольника (если данные отрезки позволяют его построить). program treugolnik; uses crt; var a,b,c: real; begin clrscr; writeln (`введите длины отрезков`); readln (a,b,c); if (a+b>c) and (a+c>b) and (b+c>a) then writeln (`треугольник существует, определим вид`) else writeln (`треугольник не существует); if (a=b) or (b=c) or (a=c) then writeln (`треугольник равнобедренный`); if (a=b) and (a=c) then writeln (`треугольник равносторонний); if (a + b = c ) or (a + c = b) or (b + c = a ) then writeln (`треугольник прямоугольный`); else writeln (`треугольник разносторонний`); readln; end. |
![]() |
![]() |
![]() |
#2 |
ТАМБОВСКИЙ ВОЛК.
Участник клуба
Регистрация: 16.03.2010
Сообщений: 1,354
|
![]()
Добавьте только после начала блок описания переенных.
P.S: Правильность написания даже не проверял.Вы выложили => уверены что верно написали.
にんじゃ
![]() |
![]() |
![]() |
![]() |
#3 |
Пользователь
Регистрация: 31.05.2010
Сообщений: 21
|
![]()
Спасибо большое)))
|
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Паскаль, Борланд Паскаль-в чем разница??? | Vremya-Dengy | Паскаль, Turbo Pascal, PascalABC.NET | 13 | 31.05.2011 18:23 |