tumanowivan2015509
?>

Найти сумму нечетных элементов и заменить их этой суммой. обычный pascal. одномерный массив.

Информатика

Ответы

didizain

ответ: uses crt;

const n=8;

var a: array[1..n] of integer;

i,s: integer;

 

begin

clrscr;

 

for i: =1 to n do

a[i]: =random(10);

 

for i: =1 to n do

  write(a[i]: 4);

  writeln;

 

  s: =0;

  for i: =1 to n do

    if a[i] mod 2< > 0 then

      s: =s+a[i];

 

      write('symma = ',s);

 

readkey;

end.

объяснение:

yamal-toy

import math

print("Введите кол-во чисел в последовательности:")

leangth_nums = input();

if int(leangth_nums) <= 1000:

   i = 0;

   nums_arr_five = [];

   print("Введите числа, когда вы решите что чисел хватит напишите stop")

   while i <= 999:

       num_input = input()

       if (num_input == "stop"):

           break;

       else:

           if (int(num_input) % 5 == 0):

               if (int(num_input) < 30000):

                   nums_arr_five.append(int(num_input))

                   i+=1

               else:

                   print("num > 30000")

           else:

               i += 1

               continue

   print(max(nums_arr_five))

else:

   print("Error leanth_nums is have lean. > 1000")

Объяснение:

monolit-kolomna

Роботтар (Роботы; robot) - адамның еңбегін автоматтандыруға арналған электрмеханикалық құрылғы. Р. аталымы чех жазушысы Карел Чапектіңшығармасынан 1920 жылдары тараған. Р. жасала бастағаннан бері олардың бірнеше буындары ауысты: басқарудың қатты схемасы бар роботтар — іс жүзінде қазіргі заманғы өнеркәсіптік роботтардың бәрі бірінші буынға жататын программаланатын манипуляторлар; сезіммен байланысты құрылғылары бар бейімделген роботтар; мұндай Р-дың үлгілері бар, бірақ өнеркәсіпте әлі де пайдаланылмайды. Өзін-өзі ұйымдастыратын немесе интеллектілік роботтар; бұл роботтық техниканың дамуының түпкі мақсаты. Интеллектілік Р-ды дайындаудағы негізгі проблема — машиналық көру проблемасы.

Объяснение:

түсінікті деп ойлайм

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

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

Найти сумму нечетных элементов и заменить их этой суммой. обычный pascal. одномерный массив.
Ваше имя (никнейм)*
Email*
Комментарий*

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

ntyremsk1
euzdenova
Natalya1895
zybin41iz81
Аверьянова
metrikajulia
mon84
corneewa20096
zoomagazinkotmatroskin
Galinova2911
alyans29
vasearu
inessa12006
Юрьевна174
Kashtanov Anna