1. Переведите число 163 10 в двоичную, восьмерічную и шестнадцатеричную системы счисления. 2. Переведите числа в десятичную систему счисления: а) 101111012, б) 1658, в)2D816
3. Переведите число 2548 по схеме A8 —A2 -A16
4. Переведите число 9B16 по схеме А16 -А2 —AS
Ответы на вопрос:
всё таки есть сомнение нужна сумма нечётных элементов массива или сумма элементов массива с нечётными индексами?
в данной прграмме подсчитывается сумма нечётных элементов массива
если же нужно второе то строку отмеченную {*} следует заменить на
if (i mod 2)> 0 then s: =s+a[i];
program massiv;
uses crt;
var a: array[1..10] of integer;
i,sum,ch: integer;
begin
clrscr;
write('введите число: ' );
readln(ch);
write('введите элементы массива: ');
sum: =0;
for i: =1 to 10 do
begin
readln(a[i]);
if (a[i] mod 2)> 0 then s: =s+a[i]; {*}
end;
writeln; write('исходный массив: ');
for i: =1 to 10 do
begin
write(a[i]);
write(' ' );
end;
writeln; writeln;
write('сумма нечётных элементов массива: ',sum)
writeln; writeln;
write('номера элементов которые больше числа ',ch,' : ' );
for i: =1 to 10 do
if (a[i]> ch) then
begin
write(i: 2);
write(' ' );
end;
writeln; writeln;
write('положительные числа которые кратны числу ',ch,' : ' );
for i: =1 to 10 do
if (a[i]> 0) and (a[i] mod ch=0) then
begin
write(a[i]);
write(' ' );
end;
readkey;
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
gtgcfgsg656702.07.2020 06:57
-
dalikha0630.03.2020 05:29
-
tilkamilkap0ct2o10.05.2021 09:28
-
1389570208465781257012.05.2022 04:25
-
Masha7201108.05.2022 03:31
-
yulia626317.05.2021 18:40
-
leo2424203.02.2022 10:17
-
Анна536364617.08.2022 19:21
-
кракодиллох30.04.2023 06:42
-
soffia24200405.01.2022 09:23
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.