1) Заданы 3 буквы A, R, O. Закодируйте слова ORA, ARO при значениях А = 0001, О = 0100, R = 0110 2) - id1136211920220730 от prisheplub 30.07.2022 03:51

Question

Информатика: 1) Заданы 3 буквы A, R, O. Закодируйте слова ORA, ARO при значениях А = 0001, О = 0100, R = 0110 2) Напишите 2-3 примера названий программ поиска информации по интернету 3) Что собой представляет постоянная величина (константа)? 4) Сравните числа 101111 в двоичной и 47 в десятичной системах счисления 5) Переведите число 765 заданное в восьмеричной системе счисления, в десятичную систему счисления

prisheplub · Accepted Answer

PascalABC.NET beginvar n := ReadInteger('Введите количество резисторов:');var Rs := ReadArrInteger('Введите их сопротивления:',n);Writeln(NewLine, 'Общее сопротивление цепи равно:');Println(' при последовательном соединении -', Rs.Sum,'Ом');Println(' при параллельном соединении -', 1/Rs.Sum(r->1/r),'Ом');end.

или кратко:

beginvar Rs := ReadArrInteger(3);Println('послед:', Rs.Sum);Println('парал:', 1/Rs.Sum(r->1/r));end.

Пример работы:

решите нужно очень (составить программу определения общего сопротивления электрической цепи при посл

MOGZ ответил