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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 07.04.2011, 08:08   #1
armenka
 
Регистрация: 06.04.2011
Сообщений: 4
По умолчанию Вычисления в математических задачах

1)дана сторона раВностороннего треугольника. найти площадь этого треугольника, его Высоту, радиусы Вписанной и описанной окружностей.

2)состаВить программу для Вычисления пути, пройденного лодкой, если ее скорость В стоячей Воде v км/ч, скорость течения реки v1 км/ч, Время дВижения по оЗеру t1 ч, а протиВ течения реки — t2 ч.

3) найти площадь круга, Вписанного В треугольник с Заданными сторонами.
armenka вне форума Ответить с цитированием
Старый 07.04.2011, 09:49   #2
mss
Заблокирован
 
Регистрация: 27.05.2010
Сообщений: 1,099
По умолчанию

icq 169527143
mss вне форума Ответить с цитированием
Старый 07.04.2011, 17:15   #3
hannan
Пользователь
 
Регистрация: 31.03.2011
Сообщений: 10
По умолчанию

1
Код:
 var strona:integer;
      S,h,r1,R:real;
  begin
    readln(strona);
      S:=sqr(strona)*sqrt(3)/4;
      R:=strona/sqrt(3);
      r1:=R/2;
      h:=sqrt(sqr(strona)-sqr(strona/2));
   writeln(S:4:3,' ',h:4:3,' ',r1:4:3,' ',R:4:3);
  end.
Изучаю delphi,vb,и немного ассемблер.Увлекаюсь радиоэлектроникой.

Radio-programm.ucoz.ru
hannan вне форума Ответить с цитированием
Старый 07.04.2011, 17:22   #4
hannan
Пользователь
 
Регистрация: 31.03.2011
Сообщений: 10
По умолчанию

2
Код:
 var s:real;
      v,v1,t1,t2:integer;
  begin
   readln(v,v1,t1,t2);
    s:=v*t1+(v-v1)*t2;
   writeln(s:5:3);
  end.
Изучаю delphi,vb,и немного ассемблер.Увлекаюсь радиоэлектроникой.

Radio-programm.ucoz.ru
hannan вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вычисления в математических задачах armenka Паскаль, Turbo Pascal, PascalABC.NET 0 06.04.2011 11:52
Нужна помощь в задачах Pascal. Fox91 Помощь студентам 9 06.12.2009 17:24
Вопросы о некоторых задачах k1r1ch Паскаль, Turbo Pascal, PascalABC.NET 3 20.10.2009 13:24
Не могу найти ошибки в задачах Кипятилка Помощь студентам 4 01.07.2009 17:58
Проверьте ошибки пожалуйста в задачах. velgelmina Помощь студентам 3 09.06.2007 22:10