![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Новичок
Джуниор
Регистрация: 15.03.2012
Сообщений: 2
|
![]()
Здравствуйте, кто сможет, решите задания по информатике,по free pascal ничего не знаю, если не сдам из универа выгонят
![]() 1)Даны три действительных числа.Написать программу,находящую минимальное число. 2)Разработать программу,которая выводит на экран дисплея значения функции sin t при различных значениях аргумента t Код аргумента 1 2 3 4 5 строка меню sin(0) sin(Pi/6) sin(Pi/4) sin(pi/3) sin(pi/2) выводимая строка '0' '1/2' 'SQRT(2)/2' 'SQRT(3)/2' '1' 3)Пусть элементами прямоугольного равнобедренного треугольника являются: а)катет а, б)гипотенуза b; в)высота h,опущенная из вершины прямого угла на гипотенузу. г)площадь S. Составить программу,которая по заданному номеру и значению соответствующего элемента вычисляла бы значение всех остальных элементов треугольников. |
![]() |
![]() |
![]() |
#2 |
Новичок
Джуниор
Регистрация: 11.10.2011
Сообщений: 3,882
|
![]()
эх....
№1 Код:
|
![]() |
![]() |
![]() |
#3 | |
a.k.a. Skull
Форумчанин
Регистрация: 17.11.2009
Сообщений: 963
|
![]()
1
Код:
Код:
Цитата:
для третьей геометрию вспоминать надо, нехочу Update: Вариант, который предложил Poma][a все-таки лучше, мой может выводить одновременно несколько чисел, при определенных условиях.
Все тривиальное просто
Последний раз редактировалось whatever; 15.03.2012 в 22:01. |
|
![]() |
![]() |
![]() |
#4 | |
Новичок
Джуниор
Регистрация: 11.10.2011
Сообщений: 3,882
|
![]() Цитата:
![]() |
|
![]() |
![]() |
![]() |
#5 | |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
![]() Цитата:
Подправить бы малость!
Mess with the best, die like the rest.
![]() Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
|
![]() |
![]() |
![]() |
#6 | |
Новичок
Джуниор
Регистрация: 11.10.2011
Сообщений: 3,882
|
![]() Цитата:
то есть сначала max := a и потом развилки? |
|
![]() |
![]() |
![]() |
#7 | |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
![]() Цитата:
Найти всё таки минимум, а не максимум!
Mess with the best, die like the rest.
![]() Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
|
![]() |
![]() |
![]() |
#8 |
Новичок
Джуниор
Регистрация: 11.10.2011
Сообщений: 3,882
|
![]()
ааа... блин вроде максимум был...
|
![]() |
![]() |
![]() |
#9 |
Новичок
Джуниор
Регистрация: 15.03.2012
Сообщений: 2
|
![]()
Помогите ещё решить!!!пожалуйста
1)составить алгоритм и программу вычисления и вывода первых 15 членов последовательности и их суммы. Последовательность задана формулой: An= ((- 1)^(n))*(X^(n)/2n-1) 2 задание Составить алгоритм и программу,вычисления суммы ряда в соответствии с приведённым вариантом. Справа от знака равенства дано для контроля математическое значение ряда 1+1/2+1/4+1/8+...+1/2^(n) волнистое равно=2 |
![]() |
![]() |
![]() |
#10 | |
Форумчанин
Регистрация: 02.04.2011
Сообщений: 136
|
![]() Цитата:
![]() Вот формулы! 1)sqr(AB)=sqr(CB)+sqr(CA) - т-ма Пифагора 2)Высота: sqr(CH)=AH*HB CH=(AC*CB)/AB 3)Катеты: к примеру sqr(CB)=HB*AB отзеркаливается аналогично! 4)Площадь S=1/2 CB*AC S=AC*CB/2 - половина произведения катетов, но точно её не помню Это всё что помню! В интернете я уверен можно найти! p.s. ![]() Последний раз редактировалось BlackFishSQL; 29.03.2012 в 22:30. |
|
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Free Pascal | Waqq | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 30.12.2011 18:47 |
Turbo Pascal и Free Pascal , в чем разница? | antoxann | Паскаль, Turbo Pascal, PascalABC.NET | 31 | 09.11.2011 07:52 |
Free Pascal | GreenDay | Помощь студентам | 0 | 03.05.2011 08:55 |
а free pascal не читает задачи которые написаны на turbo pascal? | demonara | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 25.05.2009 16:28 |
Free pascal | Иллидан | Свободное общение | 5 | 17.04.2008 12:22 |