VPF::Расчет площади кольца - Форум программистов

borntrap

Дата 27.3.2007, 08:40 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 9
Регистрация: 29.12.2006

Репутация: нет
Всего: нет

Уважаемые господа гуру!

У меня одна хорошая знакомая пришла с одной задачей.
Но я увы в этом полный профан. Просьба такая:

Требуется написать простенькую программу на Turbo Pascal для расчета площади кольца
Вводятся две переменные R и r . Нужен собственно листинг программы.

Спасибо.

Addmin

Дата 27.3.2007, 10:17 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 803
Регистрация: 3.2.2006
Где: сослан в Сибирь

Репутация: нет
Всего: 15

borntrap, ты формулу площади круга знаешь? Так вот бери учебничек по информатике и преобразуй в код.

--------------------

SimpleFit.ru - блог о том, как заниматься спортом нормальным людям
--
Стимул работы в Сибири - комары.

Ofer

Дата 31.3.2007, 00:55 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 293
Регистрация: 15.10.2006
Где: КривбаСС

Репутация: нет
Всего: 5

Площадь кольца находим как разницу большого и малого кругов

Код


uses CRT;
var
 R, rm, P : Real;
begin
  ClrScr;
  Write('Введите R ');
  ReadLn(R);
  Write('Введите r ');
  ReadLn(rm);
  P := 3.14*(Sqr(R) - Sqr(rm));
  WriteLn('Площедь кольца = ', P:4:2);
  ReadLn;
end.

Помоему сложного ничего нет....

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Object Pascal: кроссплатформенные технологии \| Следующая тема »