,,Даны три проводника с сопротивлениями R1, R2 и R3. Составить программу для нахождения общего сопротивления при последовательном и параллельном соединении проводников".и нарисуйте блоксхему к программе
Заданная уравнением прямая всегда будет гипотенузой прямоугольного треугольника, а его прямой угол всегда будет лежать в точке пересечения осей координат. Таким образом, размещение гипотенузы всегда будет определять четверть, в которой находится треугольник. Гипотенуза пересекает ось Х в точке с координатами (х1; 0), а ось Y - в точке с координатами (0;y2). Найдем эти координаты, считая коэффициенты a и b в уравнении прямой заданными. Теперь можно определить номера четвертей n, в которых располагается гипотенуза.
var a, b: integer; f: Text;
begin Assign(f, 'input.txt'); Reset(f); Readln(f, a, b); Close(f); Assign(f, 'output.txt'); Rewrite(f); if a < 0 then if b < 0 then Writeln(f, '3') else Writeln(f, '1') else if b < 0 then Writeln(f, '4') else Writeln(f, '2'); Close(f) end.
Const n = 5; var i: integer; a: array[1..n * 2 + 1] of integer; begin writeln('исходный массив: '); for i : = 1 to 2 * n do begin a[i] : = random(99) + 1; write(a[i] : 5); end; for i : = 2 * n + 1 downto n + 1 do a[i] : = a[i - 1]; a[n + 1] : = 0; writeln(); writeln('полученный массив: '); for i : = 1 to 2 * n + 1 do write(a[i] : 5); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку