По информатике. найти общее сопротивление из трех последовательных резистеров. решить на языке паскаля. нужно, надеюсь знаете основы. program (имя), var (cтрока описания переменных), begin (начало програмного блока) и.т.д до end.
Program soprotivlenie; Rs это общее var R1,R2,R3,Rs:integer; begin Rs:=0; writeln('ввести сопротивления в резисторах'); readln(R1,R2,R3); Rs:=R1+R2+R3; writeln('общее сопротивление равно ',Rs) end. как то так. для проверки вычисли на бумаге а потом в программе.
var R1,R2,R3,Rs:integer;
begin
Rs:=0;
writeln('ввести сопротивления в резисторах');
readln(R1,R2,R3);
Rs:=R1+R2+R3;
writeln('общее сопротивление равно ',Rs)
end.
как то так. для проверки вычисли на бумаге а потом в программе.