Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
Вован22
0 / 0 / 0
Регистрация: 06.10.2013
Сообщений: 37
1

Сравните внутренние энергии водорода массой 2кг. при температуре 15С и 1,5кг. кислорода при 20С

17.02.2014, 18:25. Просмотров 920. Ответов 1
Метки нет (Все метки)

Сравните внутренние энергии водорода массой 2кг. при температуре 15С и 1,5кг. кислорода при 20С.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.02.2014, 18:25
Ответы с готовыми решениями:

Айсберг массой 10^9 кг при температуре 0° С дрейфует в Гольфстриме
Айсберг массой 10^9 кг при температуре 0° С дрейфует в Гольфстриме, температура...

Какой объем занимает аргон массой 1кг при давлении р == 1 МПа и температуре 400 К?
Какой объем занимает аргон массой 1кг при давлении р == 1 МПа и температуре...

Сравните электропроводность германия при температуре -50º С и +50º С
Привет всем! Люди, помогите кто чем может, завтра РГЗ сдавать(( 1. Сравните...

Определить наиболее вероятное значение кинетической энергии при температуре 314 К для молекулы гелия
Пожалуйста, помогите. С помощью распределения Максвелла по кинетическим...

При температуре воздуха зимой до -20◦ С потребление угля тепловой станцией составляет 50 тонн в день. При температуре воздуха от -20◦ С до -30◦ С е
При температуре воздуха зимой до -20◦ С потребление угля тепловой станцией...

1
code-n'-help
Форумчанин Паскаля
76 / 89 / 55
Регистрация: 08.11.2013
Сообщений: 395
Записей в блоге: 2
17.02.2014, 19:05 2
Лучший ответ Сообщение было отмечено mik-a-el как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
var q,c1,c2,m,t1,t2:longword; Q1,Q2:longword;
begin
write('Vvedite c kisloroda=');
read(c1);
write('Vvedite c vodoroda=');
read(c2);
write('Vvedite massy=');
read(m);
write('Vvedite temperatury vodoroda=');
read(t2);
write('Vvedite temperatur kisloroda=');
read(t1);
Q1=t1*m*c1;
Q2=t2*m*c2;
if Q1>Q2 
then writeln ('kisloroda energia bolshe na ',Q1-Q2);
else if Q1= Q2
then writeln('oni ravni');
else writeln('vodorada bolshe na 'Q2-Q1);
end.
Добавлено через 1 минуту
Прошу прощения я сделал программу универсальней и я забыл просто какое c у водорода и C у водорода

Добавлено через 1 минуту
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
var q,c1,c2,m,t1,t2:longword; 
     Q1,Q2:longword;
begin
  write('Vvedite c kisloroda=');
  read(c1);
  write('Vvedite c vodoroda=');
  read(c2);
  write('Vvedite massy=');
  read(m);
  write('Vvedite temperatury vodoroda=');
  read(t2);
  write('Vvedite temperatur kisloroda=');
  read(t1);
  Q1=t1*m*c1;
  Q2=t2*m*c2;
  if Q1>Q2 
  then writeln ('kisloroda energia bolshe na ',Q1-Q2);
  else if Q1= Q2
        then writeln('oni ravni');
        else writeln('vodorada bolshe na 'Q2-Q1);
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.02.2014, 19:05

Определить общее изменение энтропии кислорода с заданной массой
Задача: 108.Определить общее изменение энтропии ΔS кислорода массой m=30г,...

Установите, какой из гидридов массой 1 г образует максимальный объем водорода
народ, прошу мне пожалуйста помочь кто чем сможет, дали писать олимпиаду...

Сколько энергии нужно затратить для получения из воды V водорода
Задание: Сколько энергии нужно затратить для получения из воды V водорода при...


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

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

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