Вычислить объем конуса программа

Выдает ошибку: вложенный файл (выражение должно относиться к целочисленному типу). Как исправить?
Есть ли какие-нибудь возможные недочеты программы и её возможные улучшения?

Изображения

пр1.jpg (13.1 Кб, 131 просмотров)

Регистрация: 15.02.2010
Сообщений: 15,414
^ — это не степень, для степени есть функция pow
Форумчанин
Регистрация: 21.06.2016
Сообщений: 109

Хорошо, а что с числом pi?
И небольшой вопрос не в тему: пользователю нужно ввести шестизначное целое число, как сделать так, чтобы при вводе не шестизначного числа (пятизначного или семизначного например) выводилась ошибка?

Участник клуба
Регистрация: 14.05.2016
Сообщений: 1,793

1) Попробуй написать просто const double Pi=3.14;

2) Любое шестизначное число находится в интервале 99 999 — 1 000 000.
Ну вот, и организуй проверку.

Регистрация: 15.02.2010
Сообщений: 15,414

Хорошо, а что с числом pi?
пользователю нужно ввести шестизначное целое число, как сделать так, чтобы при вводе не шестизначного числа (пятизначного или семизначного например) выводилась ошибка?

В лоб проверить длину полученной строки или перевести эту строку в число и сравнить диапазон.
Форумчанин
Регистрация: 21.06.2016
Сообщений: 109
Решил проблему с pi, но что делать тут?

Геометрия 11. Найти объем конуса

double r2 = pow ( r, 2 ) / 3;
V = M_PI* r2*h;
cout >

Ошибка: операнд * должен быть указателем.
Форумчанин
Регистрация: 21.06.2016
Сообщений: 109

В лоб проверить длину полученной строки или перевести эту строку в число и сравнить диапазон.

Можно вопрос: чему не должно быть равно С? 12 не подходит
Регистрация: 15.02.2010
Сообщений: 15,414

Дайте скрин с кодом и сообщением компилятора.

Читайте также:
Что блокирует запуск программы
чему не должно быть равно С? 12 не подходит

Не, так не пойдет. Вы же уже ввели число, а не строку. Сравнивайте на диапазон.
Форумчанин
Регистрация: 21.06.2016

Сообщений: 109
Изображения

пр1.jpg (17.0 Кб, 134 просмотров)
пр2.jpg (11.1 Кб, 137 просмотров)

Форумчанин
Регистрация: 21.06.2016
Сообщений: 109

Дайте скрин с кодом и сообщением компилятора.

Не, так не пойдет. Вы же уже ввели число, а не строку. Сравнивайте на диапазон.

Не подскажете как?

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
OpenGL Основание конуса перетекает в вершину lnKod C++ Builder 03.06.2016 18:26
составить программу для вычисления обьема конуса arai uzbekova Паскаль, Turbo Pascal, PascalABC.NET 1 03.03.2013 21:57
Вычислить объём цилиндра и конуса shablakov Паскаль, Turbo Pascal, PascalABC.NET 2 18.12.2012 12:46
Рассчитать площадь поверхности конуса: Не найду ошибку в ассемблере Skender Помощь студентам 2 24.09.2011 12:08
Рисование тени конуса bill Gamedev — cоздание игр: Unity, OpenGL, DirectX 12.12.2010 17:43

11 класс. Геометрия. Объем конуса. 21.04.2020

Источник: www.programmersforum.ru

Составить программу: 1. Вычисления объема конуса (V=1/3pi r^2 h)

Получи верный ответ на вопрос «Составить программу: 1. Вычисления объема конуса (V=1/3pi r^2 h) . » по предмету Информатика, используя встроенную систему поиска. Наша обширная база готовых ответов поможет тебе получить необходимые сведения!

Новые вопросы по информатике
Напиши обратные действия. Снять — Открыть — Прилететь —
Перевести число 2-чной системы счисления в 10-чную: 1110000/2, 10001101/2
Какими знаками можно обозначить на письме звонкий и глухой удары в барабан?

1) В поезде 17 вагонов, 10-17-купейные, остальные-плацкарт. Ввести № вагона. напечатать вид. 2) Ввести 2 числа. Напечатать их частное или сообщить, что на 0 делить нельзя

Товар стоит a руб. b коп. За него заплатили c руб. d коп. Сколько сдачи требуется получить? программа паскаль

Читайте также:
Реферальная программа рейд не работает

Источник: 4i5.ru

Найти обьём конуса. — Pascal

Нужно решить семь задач они почти все одиннаковы. Очень прошу. Кто какую сможет. Первая задача)Найти обьём конуса. Вторая задача) Написать программу вычисляющую значение функции y=50x*x+3z/5 Третья задача) Вычислить сопротивление цепи, состоящей из двух резисторов,соединёных параллельно.

Четвёртая задача) Вычислить сопротивление цепи, состоящей из двух резисторов,соединёных последовательно. Пятая задача) Написать программу вычисляющую значение функции y=5x*x+3z Шестая задача) Написать программу вычисляющую значение функции y=3a-4cd Седьмая задача) Написать программу вычисляющую значение функции y=3sinx/cosx

Код к задаче: «Найти обьём конуса.»

Листинг программы

Program prikol; Uses crt; Procedure ferst; Var h,r,V:real; begin WriteLn(‘Введите высоту и радиус ‘); readLn(h,r); V:=1/3*pi*sqr(r)*h; WriteLn(‘Обьём конуса равен ‘,V:5:3); end; Procedure second; Var x,y,z:real; begin Write(‘Введите x и z ‘); readLn(x,z); y:=50*sqr(x)+3*z/5; WriteLn(‘Y = ‘,y:5:3); end; procedure tree; Var r1,r2,R:real; begin Write(‘Введите первое и второе сопротивление ‘); readLn(r1,r2); R:=1/(1/r1+1/r2);WriteLn(‘R = ‘,R:5:3); end; procedure cherire; Var r1,r2,R:real; begin Write(‘Введите первое и второе сопротивление ‘); readLn(r1,r2); R:=r1+r2;WriteLn(‘R = ‘,R:5:3); end; Procedure pyat; Var x,y,z:real; begin Write(‘Введите x,z ‘); readLn(x,z); y:=5*sqr(x)+3*z; WriteLn(‘Y = ‘,y:5:3); end; Procedure Shest; var a,y,c,d:real; begin Write(‘Введите a,c,d’); readLn(a,c,d); y:=3*a-4*c*d; WriteLn(‘Y = ‘,y:5:3); end; Procedure sem; Var y,x:real; begin Write(‘Введите x,y ‘); readLn(x,y); y:=3*sin(x)/cos(x); WriteLn(‘Y = ‘,Y:5:3); end; Var c:char; Begin clrscr; WriteLn(‘Какую задачу вы хотите решить? 1-первую,2-вторую и тд ‘); c:=readKey; case c of ‘1’:ferst; ‘2’:second;’3′:tree;’4′:cherire;’5′:pyat; ‘6’:Shest; ‘7’:sem; end; readLn; end.

Источник: studassistent.ru

Рейтинг
( Пока оценок нет )
Загрузка ...
EFT-Soft.ru