Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/30: Рейтинг темы: голосов - 30, средняя оценка - 4.60
0 / 0 / 0
Регистрация: 03.12.2012
Сообщений: 5
1

Вычисление площади круга (доделать)

23.01.2013, 23:10. Показов 5466. Ответов 2
Метки нет (Все метки)

Здравствуйте уважаемые товарищи-программисты! Хочу обратится к вам за помощью. Вообщем задание такое: Запрашивается радиус круга (от 10 до 100 пикселов). И нужно написать программку так чтобы она вычисляла площадь этого круга. Круг нарисован в зависимости от введенного радиуса, внутри выводится вычисленная площадь с точностью до сотых.
Начало было написанно форумчанином SoftIce, а именно:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Const PI = 3.14159
 
Private Sub Command1_Click()
Dim S As Single, R As Single, W As Integer
   Cls
   R = Val(Replace(InputBox("Введите радиус", "Ввод данных", 79.8), ",", "."))
   S = Round(PI * R * R, 2)
   Scale (-200, 200)-(200, -200)
   Circle (0, 0), R
   Print "r = " & R & vbCrLf & "S = " & S
End Sub
Нужно вроде как ещё что то нужно дописать. Помогите пожалуйста!
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
23.01.2013, 23:10
Ответы с готовыми решениями:

Вычисление площади и периметра треугольника
Вычисление площади и периметра треугольника. Данны декартовы координаты вершин треугольника(в...

Вычисление площади треугольника, построенного по трем точкам
Такая задача: Составьте процедуру на языке VBA для вычисления площади треугольника, построенного...

Подпрограмма: вычисление площади треугольника, заданного координатами вершин
Прошу помощи недавно начал заниматься программированием VBA. Написать программу с ...

Присвоить Z значение 1, если площадь круга с радиусом АВ больше площади круга с радиусом CD
Задание такое: Даны четыре точки А(х1,у1), В(х2,у2), С(х3,у3), D(х4,у4) и Z. Присвоить Z значение...

2
15019 / 6347 / 1725
Регистрация: 24.09.2011
Сообщений: 9,976
24.01.2013, 00:36 2
havvvok, программа для VB или VBA? Если VBA, то в каком приложении?
0
5543 / 1348 / 148
Регистрация: 08.02.2009
Сообщений: 4,084
Записей в блоге: 30
24.01.2013, 02:54 3
Из того, что было: Как вычислить длину окружности с точностью до тысячных

Разница:
1) радиус там не запрашивается — выпадает случайно;
2) вместо площади круга (пи-эр-квадрат) там выводится 2-пи-эр (длина окружности);
3) там больше точность
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.01.2013, 02:54

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Вычисление площади и периметра квадрата и прямоугольника, описанных вокруг круга заданной площади S
Составить программу для вычисления площади и периметра квадрата и прямоугольник, описанных вокруг...

Вычисление площади круга
Здравствуйте уважаемые товарищи-программисты! Хочу обратится к вам за помощью. Вообщем задание...

Вычисление площади круга
Напишите ф-ию double circle_area (double R) которая определяет площадь круга, ( R- радиуса)....

Вычисление площади круга
Написать функцию вычисления площади круга. Функция main должна содержать ввод аргументов функции...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.