Помогите пожалуйста. Не получается составить программу (Язык Паскаль) вычисления...

0 голосов
39 просмотров

Помогите пожалуйста. Не получается составить программу (Язык Паскаль) вычисления сопротивления электрической цепи,состоящей из двух последовательно соединенных сопротивлений. (Величина первого сопротивления 15 Ом, второго сопротивления 27,3 Ом)Вот как начал составлять программу. uses crt; var x,y,c:real; begin clrscr; write('Введите 1 сопротивление...'); readln (x); write ('Введите 2 сопротивление...'); readln (y); readln(c); c:=(x*y)/(x*y); writeln('c',c:8:2); readln; End.


Информатика (12 баллов) | 39 просмотров
Дан 1 ответ
0 голосов

Сопротивление при последовательном соединение равно сумме двух сопротивлений

uses crt;

var x,y,c:real;  

begin  

write('Введите 1 сопротивление...');  

readln (x);  

write ('Введите 2 сопротивление...');  

readln (y);  

c:= x + y;  

writeln('Сопротивление ',c);  

End.

(558 баллов)
0

Пишет Неожиданный символ "