Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Natali18
0 / 0 / 0
Регистрация: 26.05.2013
Сообщений: 13
1

Ошибка в программе расчета формулы

10.12.2013, 20:35. Просмотров 228. Ответов 2
Метки нет (Все метки)

Программа работает, но при расчете результат не выдает, в чем ошибка?
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
program Natasha;
uses crt;
var
p,d,sigma,C,g:real;
begin
clrscr;
writeln('vvedite vnutrennee davlenie,MPa');
readln(p);
writeln('vvedite diametr,m');
readln(d);
writeln('vvedite dopuskaemoe naprjazenie,MPa');
readln(sigma);
writeln('vvedite C,');
readln(C);
g:=sqrt(sigma+p)/sqrt(sigma-p)-(1*d/2+C);
writeln('tolsina stenki g:=');
writeln('dlja zavershenia nazmite lubyu klavishu');
readkey;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.12.2013, 20:35
Ответы с готовыми решениями:

Процедура и функция для расчета формулы
Есть код написанный на Delphi по задаче (прикреплена указана ниже), помогите...

Ошибка в программе.
подскажите, что не так?

Ошибка в программе.
А мне не поможите? Выдает ошибку, скрин не даю а дам код: var f:text;...

Ошибка в программе
Вообщем суть программы в том чтобы соединить два рисунка,двоичный код для...

Ошибка в программе
выдает ошибку модуль graph не найден {$n+} uses graph; var gd, gm:...

2
mellowass
89 / 69 / 82
Регистрация: 18.11.2013
Сообщений: 113
10.12.2013, 20:46 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
program Natasha;
uses crt;
var
p,d,sigma,C,g:real;
begin
clrscr;
writeln('vvedite vnutrennee davlenie,MPa');
readln(p);
writeln('vvedite diametr,m');
readln(d);
writeln('vvedite dopuskaemoe naprjazenie,MPa');
readln(sigma);
writeln('vvedite C,');
readln(C);
g:=sqrt(sigma+p)/sqrt(sigma-p)-(1*d/(2+C));
writeln('tolsina stenki g:=',g);
writeln('dlja zavershenia nazmite lubyu klavishu');
readkey;
end.
Добавлено через 2 минуты
У вас две маленькие ошибки:
g:=sqrt(sigma+p)/sqrt(sigma-p)-(1*d/(2+C));
riteln('tolsina stenki g:=',g);
1
Natali18
0 / 0 / 0
Регистрация: 26.05.2013
Сообщений: 13
10.12.2013, 20:51  [ТС] 3
спасибо))
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.12.2013, 20:51

Ошибка в программе
составить поставку,алгоритм и программу выдачи на экран в PASCALe неравных 3.2...

Ошибка в программе.
На 72 строчке выдает ошибку"Операция '=' не применима к типам array of 2..5 и...

Ошибка в программе!
Программа вычисляет таблицу значений функции F(x) c шагом A/4 (A=1),...


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

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

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