Var c,m,t1,t2,q: integer; begin write('введите c '); readln(c); write('введите m '); readln(m); write('введите t1 '); readln(t1); write('введите t2 '); readln(t2); q: =c*m*(t2-t1); writeln('количества теплоты ',q); end.
Спасибо
Ответ дал: Гость
нет,оно вряд ли.ведь что такое компьютер? это арифрометр.не видили никогда такую машинку? компьютер работает тупо.а про разборки (искусственого интелекта) я могу много баек рассказать могу это дело.и в ученые доили.государство,и в сша.
Популярные вопросы