Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
PauD
06.04.2023 07:19 •
Информатика
Решите в паскале. 1. определить количества теплоты, выделяющейся в замкнутой цепи, по закону джоуля-ленца: q: =i2*r*t, где i=10а, r=100 ом, а t изменяется от 1 до 10.
Показать ответ
Ответ:
kseniy124321
10.07.2020 17:24
Const
I = 10;
R = 100;
var t: integer;
begin
for t := 1 to 10 do
writeln('t = ', t:2, ' Q = ', I*I*R*t, ' Дж');
end.
0,0
(0 оценок)
Ответ:
51Qwerty15
10.07.2020 17:24
Готово
.
0,0
(0 оценок)
Популярные вопросы: Информатика
лунный3
25.02.2022 05:43
Байтардың аты бар қандай да бір тізбек қалай аталады? пожл...
srs777s
25.02.2022 05:43
Var k,s : integer; begin s: =0 k: =0 while k 30 do begin k: =k+3; s: =s+k; end; write(s); end....
yarroslawfd
04.09.2022 12:43
Програми з циклом while (задачі) Задача Multiplication.py Дано кількість множників K. Знайти їх добуток. 2∙5∙8∙11∙… Контрольні приклади 1) K=1 = d= 2 2) K=2 = d= 10 3)...
msganny
17.03.2023 06:01
Составьте программу нахождения количества натуральных целых чисел, не превышающих 100 и кратных 5...
okcanatsarenko
29.02.2020 09:24
Укажите отношение для пары «ввод и форматирование»: 1) является разновидностью 2) является элементом множества 3) входит в состав 4) предшествует...
margarinchik2008
19.02.2022 07:33
Как отреагировал Лонгрен на рассказ дочери о предсказании волшебника? О чём толковали рыбаки, услышав о предсказании Эгля? Каков финал 1 главы? Поверила ли Ассоль предсказаниям...
mainaalikuliev
03.01.2020 23:45
Борьба кыргызского народа за независимость хvı-xıx...
leron9999
03.01.2020 23:45
Из предложенных вариантов ответа выбери правильный. Закончи фразу. Чтобы изменить полярность электромагнита на противоположную, необходимо ... . изменить напряжение в цепи...
lukash231082
05.10.2020 19:25
Дуже треба! Детальний План до розділу lV Чорна рада Пантелеймон Куліш...
CRaBFeed
05.10.2020 19:25
14175 розбір як частина мови...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
I = 10;
R = 100;
var t: integer;
begin
for t := 1 to 10 do
writeln('t = ', t:2, ' Q = ', I*I*R*t, ' Дж');
end.
.