Задача по информатике. Найти общее сопротивление из трех последовательных резистеров. решить на языке Паскаля. Срочно нужно, помогитеНадеюсь знаете основы. Program (имя), var (cтрока описания переменных), begin (начало програмн...
Задача по информатике.
Найти общее сопротивление из трех последовательных резистеров.
решить на языке Паскаля. Срочно нужно, помогите
Надеюсь знаете основы. 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.
как то так. для проверки вычисли на бумаге а потом в программе.
Не нашли ответ?
Похожие вопросы