Информатика, вопрос задал kljud , 2 года назад

переведите из паскаля в питон пожалуйста
var
m: array [1..10] of integer;
max, k, i: integer;
begin
for i := 1 to 10 do
read(m[i]);

max := m[1];
k := 1;

for i := 2 to 10 do
if m[i] > max then
begin
k := 1;
max := m[i]
end
else
if m[i] = max then
inc(k);
write(k)
end.​


restIess: а есть просто задачка? Лень паскаль этот читать
kljud: дан массив из десяти целых чисел. определите, сколько элементов этого массива имеют максимальное значение.

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

Ответил restIess
1

a = []

k = 0

for i in range(10):

   a.append(int(input()))

max = a[0]

for i in range(1,10):

   if a[i] > max:

       max = a[i]

for i in range(10):

   if a[i] == max:

       k+=1

print(k)


kljud: а a.append что значит?
restIess: это так в питоне добавляется элемент в список
kljud: аа, спасибо огромное!
restIess: если есть вопросы - спрашивайте)
kljud: а в самой первой строке там не а=[0]*n
restIess: Не, мы создали пустой список, а потом добавляли в него элементы
restIess: Память под элементы выделяется динамически
kljud: аа, ещё раз спасибо)
restIess: Забивать нулями список следует в случаях, когда нам надо хранить что-то лишь в определенных ячейках(индексах)
kljud: теперь поняла)
Новые вопросы