Есть ответ 👍

Впрограмме описан одномерный целочисленный массив с индексами от 0 до 10 и целочисленные переменные r, i. в произведенном ниже фрагменте программы массив сначала заполняется, а потом изменяется: for i: =0 to 10 do a[i]: =i; for i: =0 to 4 do begin k: =a[10-i] ; a[10-i]: =a[i]; k: =a[i] end; чему будут равны элементы этого массива? 1) 10 9 8 7 6 54 3 2 1 0 2) 0 1 2 3 4 5 6 7 8 9 10 3) 0 1 2 3 4 5 4 3 2 1 0 4) 10 9 8 7 6 5 6 7 8 9 10

237
458
Посмотреть ответы 2

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


Правильный ответ - 3
007sergey
4,7(65 оценок)

vars,c,k: string; i: integer; beginwrite ('введите первое слово: '); readln(s); write ('введите второе слово: '); readln(c); while length(s)< > 0 dobegin  k: =s[1];   delete(s,1,1);   while pos(k,s)< > 0 do  delete(s,pos(k,s),1);   if pos(k,c)=0 then write('нет ')                              else write('да '); end; end.

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