Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 22.12.2011, 00:25   #1
BlackFishSQL
Форумчанин
 
Аватар для BlackFishSQL
 
Регистрация: 02.04.2011
Сообщений: 136
По умолчанию довести лёгкую задачу!

Помогите довести задачу!
(дельта как в физике типа треугольничек)

В лабораторной работе по определению теплоёмкости вещества измеряют преращения температуры (дельта Т) при сообщении одинакового количества теплоты Q=420 Дж шести образцам одинаковой массы m=0.12кг, изготовленным из разных материалов. Составить программу, которая вычисляет теплоёмкость вещества с=Q/(m*(дельта T)). Данные измерений дельта Т вводятся в массив с клавиатуры. Результат измерений и вычислений выводятся в таблицу.

Вот мой код но выбивает ошибку "Операнды имеют непреводимый тип"
Код:
program sgdhf;
var T:array[1..6] of integer;
    i:integer;
    c,m,Q:integer;
begin
Q:=420;
m:=420;
writeln('введите значения Т');
for i:=1 to 6 do
 read(T[i]);
writeln('Образец   :    Теплоёмкость');
for i:=1 to 6 do
 begin
  c:=Q/(T*m);
  writeln('   ', i ,'        ',c);
 end;
end.
BlackFishSQL вне форума
Старый 22.12.2011, 00:29   #2
Xardas
Сисадмин
Форумчанин
 
Аватар для Xardas
 
Регистрация: 28.12.2007
Сообщений: 320
По умолчанию

T - это массив у Вас.

Код:
c:=Q/(T[i]*m);
И переменную с сделайте вещественного типа
Xardas вне форума
Старый 22.12.2011, 00:31   #3
BlackFishSQL
Форумчанин
 
Аватар для BlackFishSQL
 
Регистрация: 02.04.2011
Сообщений: 136
По умолчанию

Xardas спасибо Вам большое!

А вообщем суть правильна или нет????
BlackFishSQL вне форума
Старый 22.12.2011, 00:35   #4
Lasur
Форумчанин
 
Аватар для Lasur
 
Регистрация: 13.10.2011
Сообщений: 143
По умолчанию

Не знаю паскаль, но есть подозрение что Q/(T*m) переводится в double(или Паскалевкий аналог, я не помню какой). с при этом имеет тип integer? вот и возникает ошибка. Попробуй объявить с как double...
Опоздал)
Все имена, фамилии, ники, даты и события упоминаемые в моих постах, являются вымышленными. Все совпадения с реально существующими - случайны.
Lasur вне форума
Старый 22.12.2011, 00:38   #5
Leshii
Форумчанин
 
Регистрация: 26.07.2011
Сообщений: 376
По умолчанию

Lasur скореe real;, но согласен.
Ну там автору виднее, но ответ таки должен быть в real.

Код:
var
    T:array[1..6] of integer;
    i:integer;
    m,Q:integer;
    с: real;
Люблю на ты.Я человек простой
Leshii вне форума
Старый 22.12.2011, 00:39   #6
Xardas
Сисадмин
Форумчанин
 
Аватар для Xardas
 
Регистрация: 28.12.2007
Сообщений: 320
По умолчанию

Цитата:
Сообщение от BlackFishSQL Посмотреть сообщение
А вообщем суть правильна или нет????
Я не вникал, но, кажется, что нет... Вы в массив вводите значения температуры и подставляете это значение в формулу. Но по этой формуле должна считаться величина дельта Т, то есть (Tконечная - Tначальная)... не особо силен в физике Ну, если вводить изначально не температуру, а ее изменение, то вроде верно

Последний раз редактировалось Xardas; 22.12.2011 в 00:47.
Xardas вне форума
Старый 22.12.2011, 00:44   #7
BlackFishSQL
Форумчанин
 
Аватар для BlackFishSQL
 
Регистрация: 02.04.2011
Сообщений: 136
По умолчанию

Я именно этот момент и не понимаю, как здесь поступить то правильно! Носудя по строчке
Цитата:
Данные измерений дельта Т вводятся в массив с клавиатуры
может это типа уже вводится Ткон-Тнач????
BlackFishSQL вне форума
Старый 22.12.2011, 00:45   #8
Leshii
Форумчанин
 
Регистрация: 26.07.2011
Сообщений: 376
По умолчанию

Ксардас, ты изначально правильно написал , дельта это разность темеператур. От большего отнимаем меньшее.
Ну , а по сути, одинаковая масса и одинаковое колво теплоты.( уже отпадает вопрос ). Скорее всего имелось ввиду, наличие 6 разностей температур у тебя =), если же все ньюансы можно опустить то просто вводиш ту дельту.
Люблю на ты.Я человек простой
Leshii вне форума
Старый 22.12.2011, 00:50   #9
BlackFishSQL
Форумчанин
 
Аватар для BlackFishSQL
 
Регистрация: 02.04.2011
Сообщений: 136
По умолчанию

Тоесть не взирая на синтаксические ошибки, получается смысл моей проги уже верен? Ну тоесть я и ввожу уже дельта Т?

Больше для меня этому обьяснений нет!
BlackFishSQL вне форума
Старый 22.12.2011, 00:50   #10
Xardas
Сисадмин
Форумчанин
 
Аватар для Xardas
 
Регистрация: 28.12.2007
Сообщений: 320
По умолчанию

Цитата:
Сообщение от BlackFishSQL Посмотреть сообщение
Я именно этот момент и не понимаю, как здесь поступить то правильно! Носудя по строчке
может это типа уже вводится Ткон-Тнач????
Если вводить изменение температуры, то Ваш код верен, если температуру - нет.
Xardas вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Довести задачу до ума на Borland 5.02 C++ planet 08 Помощь студентам 6 08.05.2011 12:03
Не могу довести до ума задачу в Паскале. Кому неспицца?) Ilotoshka Помощь студентам 2 24.11.2010 05:18
Написать очень лёгкую программу Олежечка8 Общие вопросы по Java, Java SE, Kotlin 2 12.05.2010 21:46
Помогите написать лёгкую программу Машенька Паскаль, Turbo Pascal, PascalABC.NET 2 18.04.2009 20:26