М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
tykuozlli2
tykuozlli2
20.08.2022 11:04 •  Информатика

Электрическая цепь составлена изэлектрическая цепь составлена из нескольких сопротивлений. определите сопротивление между узлами а и б. нужно написать программу в паскале. между а и б сопротивление r1, r(общее r2, r3), r4 соединены последовательно, а r2 и r3 параллельно. т.е. общее сопротивление равно.. r=r1+(r2*r3)/(r2+r3)+r4 на основании этой формулы нужна программа.

👇
Ответ:
Niklosh
Niklosh
20.08.2022
Var
  r, r1, r2, r3, r4 : real;
begin
  write ('R1 = '); readln (r1);
  write ('R2 = '); readln (r2);
  write ('R3 = '); readln (r3);
  write ('R4 = '); readln (r4);
  r := r1 + (r2 * r3) / (r2 + r3) + r4;
  writeln ('R = ', r);
end.
4,6(11 оценок)
Открыть все ответы
Ответ:
Mrrezed
Mrrezed
20.08.2022

1

а)  В кабинете есть парты и стулья. В кабинете есть парты или стулья.

б) Одна половина класса изучает английский язык и вторая половина изучает французский язык. Одна половина класса изучает английский язык или вторая половина изучает французский язык.

в) Антон и Серёжа старше Лили. Антон или Серёжа старше Лили.

2

А или В: 1+0=1 Истина

А и В: 1*0=0 Ложь

В или С: 0+0=0 Ложь

3

а) Составное; конъюнкция.

б) Элементарное.

в) Составное; дизъюнкция.

г) Составное; конъюнкция.

д) Составное; дизъюнкция.

е) Составное; дизъюнкция.

Если ответ , отметьте его как лучший.

4,8(52 оценок)
Ответ:
Killrog
Killrog
20.08.2022
4.
var
a:real;
begin
write('Введите количество мегабайт=');read(a);
writeln('Количество килобайт=',a*1024);
writeln('Количество байт=',a*1024*1024);
writeln('Количество бит=',a*1024*1024*8);
end.

5.
var
a,b,c,p,S:real;
begin
write('Введите сторону a=');read(a);
write('Введите сторону b=');read(b);
write('Введите сторону c=');read(c);
P:=(a+b+c)/2;
S:=sqrt(p*(p-a)*(p-b)*(p-c));
write('S=',s:5:2);
end.

6.
var
a:integer;
begin
write('Введите количество суток=');read(a);
writeln(24*a,' ','часов');
writeln(60*24*a,' ','минут');
writeln(60*60*24*a,' ','секунд');
end.
4,6(93 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ