Регистрация
Mider123
23.04.2020 23:09
Информатика
Есть ответ 👍

Створити програму (петлю), яка проходить по всіх елементах змінної типу string і видає повідомлення про помилку, якщо змінна містить символи заборонені для назв змінних ( !,@,#,$,%,^,&,*,(,),[,],{,},?,/,+,= ). У змінній мають бути усі символи, що в дужках, та будь-яке слово на англійській. Python

180
227
Посмотреть ответы 1

Ответы на вопрос:

Marcelyn
Marcelyn
4,6(70 оценок)

всё таки есть сомнение нужна сумма нечётных элементов массива или сумма элементов массива с нечётными индексами?

в данной прграмме подсчитывается сумма  нечётных элементов массива

 

 

если же нужно второе то строку отмеченную {*} следует заменить на

 

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. 

 

 

Популярно: Информатика