В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
ткач2
ткач2
14.05.2021 09:55 •  Информатика

Помгите

информатика 7 класс ​


Помгите информатика 7 класс ​

Показать ответ
Ответ:
Swim1223
Swim1223
20.05.2022 01:33

import array

a = array.array ('i',[])

import random

_summ = _elem = 0

_len = int (input ("Lenght: "))

for l in range(_len):

   a.append(random.randrange(0,700))

   if a[l] < 50:

       _summ+=a[l]

       _elem+=1

print ("Summ: ", _summ)

if _elem != 0:

   print("Average: ", _summ/_elem)

else:

   print("Average: 0!")

print("Mass: ", a)

Результат работы:

Lenght: 20

Summ:  7

Average:  7.0

Mass:  array('i', [266, 89, 7, 407, 506, 130, 630, 362, 419, 82, 639, 619, 695, 383, 685, 477, 368, 81, 62, 199])

Lenght: 5

Summ:  18

Average:  18.0

Mass:  array('i', [486, 170, 18, 183, 307])

0,0(0 оценок)
Ответ:
vova01092005
vova01092005
23.12.2022 08:39

Pascal

const

 n=6;

var

a, b :array[0..n-1] of integer;

i :integer;

begin

 for i:=0 to n-1 do begin

   write('Введите a[', i+1, '] :');

   readln(a[i]);

 end;

 writeln();

 writeln('Увеличиваем каждый элемент в 2 раза');

 for i :=0 to n-1 do begin

   b[i]:= 2*a[i];

   write(b[i], ' ');

 end;

 writeln();

 writeln('Увеличиваем на 5 все элементы проме 1-го и последнего');

 for i:=0 to n-1 do begin

   if (i=0) or (i=n-1) then

     b[i]:= a[i]

   else

     b[i]:= a[i] +5;

   write(b[i], ' ');

 end;

 writeln();

 writeln('Первую половину массива увеличиваем на 1, вторую в 2 раза');

 for i:=0 to n-1 do begin

   if i < n div 2 then

     b[i]:= a[i]+1

   else

     b[i]:= 2 * a[i];

   write(b[i], ' ');

 end;

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота