vadimkayunusov
?>

Какие записи алгоритмов вы знаете. Выберите несколько из 4 вариантов ответа:​

Информатика

Ответы

gunel1988alieva

Відповідь:

1, 2, 3

Пояснення:

natkuv7
                                     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.

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


решите нужно очень (составить программу определения общего сопротивления электрической цепи при посл
решите нужно очень (составить программу определения общего сопротивления электрической цепи при посл
AkimovaI1608
                                     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.

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


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

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Какие записи алгоритмов вы знаете. Выберите несколько из 4 вариантов ответа:​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

admiral-kazan
Varagyant
vallzh8328
Kosov-Aleksandr379
Yurevich1701
Irina-Tunyan
rusinfopro
NikonA83
foto5113161
rimmaskis
qadjiyevaaynura
b3dllam
cvetprint
Reznikova1075
Pavlushina-Novikova