Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
magamedaliev150
02.06.2020 06:21 •
Информатика
Решите через pascal abc. вычислить количество теплоты, выделяемой за время t в проводнике с сопротивлением r, через который проходит ток силой i, по формуле q=i^2*r*t
Показать ответ
Ответ:
mishka1113
26.08.2020 08:34
Program n1;
var i,q,r,t: real;
begin
readln(i,t,r);
q:=i*i*r*t;
writeln(q);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Спасибо666
13.10.2021 09:08
Упростите логическое выражение. а) X = X б) (X- Y)- (Y- X) Буду очень благодарна ...
EgorJORDAN
09.11.2020 23:36
В состав каких систем входит подсистема компьютер? Для каких систем компьютер является надсистемой?...
cerivcankin
22.02.2022 05:36
Арифметика длинных чисел реализуется чаще всего: 1. методом декомпозиции 2. методом грубой силы...
Анна02000
11.03.2021 04:13
Определите информационный объем каждого вида памяти в вашем компьютере (озу, кеш-память, жёсткий диск, примерный суммарный объем cd и dvd-дисков с данными и т.п.)...
daniilnz1
24.07.2020 20:23
Паскаль: ) надо написать процедуру , которая вычисляет степень целого числа. использовать для её вычисления значение выражения y: =a1*x^4+a2*x^3+a3*x^2+a4*x+a5...
lele4
06.09.2021 12:15
Соотнеси типы данных с их значениями Типы данных Значения 1. Целые a. «1fudgjue», «t9» 2. Строковые b. True, Falce 3. Логические c. 2416; -497...
aassdfgb
26.04.2023 09:22
4. Архіви мають розширення: a) *.pptx *.docx *.psd.b) * jpg *.tiff *.png.c) * 7z * .rar *.zip....
иринка2807
29.10.2022 08:41
Запиши названия окон, в которых отображаются следующие объекты...
Andreychic23
26.12.2020 12:38
Если сумма больше 10000 то скидка 10%, а Если сумма меньше 10000 то на товар нет скидок на языке C++...
89086443040
11.06.2020 10:58
5 речень про мову та розібрати за частинами мови...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var i,q,r,t: real;
begin
readln(i,t,r);
q:=i*i*r*t;
writeln(q);
end.