Есть ответ 👍

1. в программе описан одномерный целочисленный массив с индексами от 0 до 10. в ниже программе он сначала заполняется, а потом изменяется. выпишите элементы массива после выполнения программы: for i: =0 to 10 do a[i]: =i+1; for i: =0 to 10 do a[i]: =a[10-i];

140
179
Посмотреть ответы 2

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

Ponomorev
4,6(96 оценок)

Вцикле  for i: =0 to 10 do 
a[i]: =i+1; элементам массива присваиваются значения 1, 2, 3, 11.итак, после выполнения первого цикла имеем массив: 1 2 3 4 5 6 7 8 9 10 11проанализируем работу второго цикла: i=0; a[0]=a[10]=11, т.е. получим: 11 2 3 4 5 6 7 8 9 10 11i=1; a[1]=a[9]=10, т.е. получим: 11 10 3 4 5 6 7 8 9 10 11 i=2; a[2]=a[8]=9, т.е. получим: 11 10 9 4 5 6 7 8 9 10 11 i=3; a[3]=a[7]=8, т.е. получим: 11 10 9 8 5 6 7 8 9 10 11 i=4; a[4]=a[6]=7, т.е. получим: 11 10 9 8 7 6 7 8 9 10 11 i=5; a[5]=a[5]=6, т.е. получим: 11 10 9 8 7 6 7 8 9 10 11 i=6; a[6]=a[4]=7, т.е. получим: 11 10 9 8 7 6 7 8 9 10 11 i=7; a[7]=a[3]=8, т.е. получим: 11 10 9 8 7 6 7 8 9 10 11 i=8; a[8]=a[2]=9, т.е. получим: 11 10 9 8 7 6 7 8 9 10 11 i=9; a[9]=a[1]=10, т.е. получим: 11 10 9 8 7 6 7 8 9 10 11 i=10; a[10]=a[0]=11, т.е. получим: 11 10 9 8 7 6 7 8 9 10 11 ответ: 11 10 9 8 7 6 7 8 9 10 11

program stroka 

uses сrt; var s,temp: string;         i,c,k,d: integer; begin      clrscr;       write('введите строку: ');       readln(s);     write('введите  длину: ');     readln(k);     temp: =''; c: =0;

 

d: =length(s); for i: =1 to d do      begin          if s[i]< > ' ' then temp: =temp+s[i];           if ((s[i]=' ') or (i=d)) and (temp< > '') then begin      if length(temp)=k then c: =c+1;       temp: ='';     end;

end;     writeln('количество слов заданной длины: ',c);

    readkey; end.

 

 

 

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