Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #3  
Старый 08.12.2010, 17:09
Аватар для deltas
deltas deltas вне форума
Новичок
 
Регистрация: 22.11.2010
Сообщения: 99
Репутация: 47
По умолчанию

Вот что-то похожее на С++
Код:
#include <stdfx.h>
#include <iostream>
#include <math.h>
 
int main( )
{
  setlocale(LC_ALL, "Russian");
 
  double m1;
 
  std::cout << "Введите массу первого тела: ";
  std::cin >> m1;
 
  double m2;
 
  std::cout << "Введите массу второго тела: ";
  std::cin >> m2;
 
  double r;
 
  std::cout << "Введите расстояние между телами: ";
  std::cin >> r;
 
  const double g = 6.61 * pow(10, -11);
  
  std::cout << "Сила притяжения между телами равна " 
            << g * m1 * m2 / (r * r)
            << std::endl;
 
  return 0;
}
Ответить с цитированием
 


Delphi Sources

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

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 07:51.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025