Напишите программу на паскале для вычисления сопротивления пожалуйста

Знания

Информатика

1 ответ:

gusel [1.7K]3 года назад

0 0

Var
R1,R2,R3,R:real;
begin
read(R1,R2,R3);
R:=R1*R2/(R1+R2)+R2*R3/(R2+R3);
write(R:2:2);
end.

Читайте также

Какой знак применяется для обозначения абсолютной ссылки в MS Excel

myhamyha

Для обозначения абсолютной ссылки применяется знак $.Например:=$A$3+$B$4.Знак $ фиксирует имя столбца и номер строки

0 0

4 года назад

Ввести с клавиатуры 2 числа.Напечатать их частное или сообщение "делить на ноль нельзя"pascalABC

Савельев Илья [665]

Program CrazyCoder;
var a, b: integer; c: real;
begin readln(a, b); if(a = 0) or (b = 0) then writeln('Делить на ноль нельзя!') else begin c := a / b; writeln(c); end; readln;end.

0 0

1 год назад

Пожалуйста помогитее 1)Дан условный оператор: if a<5 and a>3 then c:=1 else c:=3Какое значение имеет переменная a , если в

Valentin-ka [7]

А от 0 до бесконечности кроме промежутка (3;5)

0 0

3 года назад

Прочитать ещё 2 ответа

Информационое сообщение объёмом 1,5 Килобайт содержит 4096 символов, кодируется одинаковым числом бит. Какое количество символов

jaqkqndje

Ответ:

Объяснение:

Потому что мы сложили 1,5с 4096

0 0

3 года назад

Прочитать ещё 2 ответа

Что не относится к беспроводной передаче данных WI-FI,USB, Bluetooth, 3G

Margo109 [10]

Usb тк там не происходит беспроводная передача данных

0 0

4 года назад