1) заменить в условии знак «>» на знак «<»
4) заменить команду k += i на команду k += 1
Объяснение:
if mark [і] > 10: k += i - если значении элемента больше 10, то считаем сумму номеров элементов
1) заменить в условии знак «>» на знак «<» - условие примет вид if mark [і] < 10, т.е. будет истинно при значении элемента меньше 10
2) заменить команду вывода print (k) на print () - команда print () выведет пустую строку
3) заменить условие if mark [і] > 10 на условие if i > 10 - условие будет истинно при номере элемента больше 10
4) заменить команду k += i на команду k += 1 - при каждом срабатывании условия увеличиваем значение k на единицу
5) изменить в цикле имя параметра i на mark, то есть вместо for i in range (20) записать for mark in range (20) - изменяет значение переменной mark от 0 до 19
Ежедневно миллионы людей запускают на своих смартфонах мобильные приложения — это целая культура, развивающаяся в бешеном темпе. Разработчики этих приложений — новые романтические герои, люди в одночасье стать миллиардерами, как создатели Instagram, имея под рукой несколько компьютеров и хорошую идею. Их нигде этому не учат, и в этом они чувствуют своё преимущество и уникальность — всё зависит от тебя самого. Ты берёшь и пишешь программу, и если она работает — значит ты всё сделал верно, если нет — твоё место в топе Apple Store займёт кто-то другой. Главное тут — скорость. Совершенно не обязательно пять лет сидеть за партой, чтобы начать программировать. Это как раз тот случай, когда всё зависит от желания и практики. С чего же всё-таки стоит начать разработку мобильных приложений, Look At Me обсудил с опытными девелоперами.
var
a: array of integer;
i, n,k: integer;
begin
//Заполняем массив сл.числами
writeln('Размер массива : '); readln(n);
writeln('Число k : '); readln(k);
setlength(a,n);
for i := 0 to n-1 do
begin
a[i] := random(1, 1000);write(a[i]:4);
end;
writeln;
//Вывод номеров элементов = k
writeln('Номера элементов равных ',k);
for i := 0 to n-1 do
begin
if a[i]=k then write(i:4);
end;
end.