magazintrofey
?>

Решить две . python, програмирование.

Информатика

Ответы

sveta740450

9:

import random

debug = True

i = 0

ls = []

r = random.randint(5, 40)

while i < r:

tmp = []

t = random.randint(1, 20)

ii = 0

while ii < t:

tmp.append(random.randint(1, 20))

ii += 1

ls.append(tmp)

i += 1

if debug == True:

print(ls)

i = 0

sm = 0

while i < len(ls)-1:

if i % 2:

sm += sum(ls[i])

i += 1

print(sm)

10:

ls = [] #ваш массив

mx = ls.index(max(ls))

mn = ls.index(min(ls))

i = mx

sm = 0

while i < mn:

sm += ls[i]

i += 1

print(sm)

gardenstreet5
Создаёшь в папке с программой два текстовых файла с именами "1.txt." и "output.txt". В первый записываешь 8 чисел без пробелов и запятых ("22031991", например).

type  matrix = array [1..8] of integer;var  F, output: text;  i, n, cc, sum: integer;  c: char;  x: matrix;  ma: real;
procedure convert (var c: char; var cc: integer);begin  if c='1' then cc:=1;  if c='2' then cc:=2;  if c='3' then cc:=3;  if c='4' then cc:=4;  if c='5' then cc:=5;  if c='6' then cc:=6;  if c='7' then cc:=7;  if c='8' then cc:=8;  if c='9' then cc:=9;  if c='0' then cc:=0;end;
procedure sorting (n: integer; x: matrix);begin  for n:=1 to 7 do begin    if x[n]>x[n+1] then swap(x[n],x[n+1]);  end;end;
begin  Assign(F, '1.txt');  Reset(F);  for i:=1 to 8 do begin    read(F, c);    convert(c,cc);    x[i]:=cc;  end;  Close(F);
  sorting(n,x);  sum:=x[1]+x[2]+x[3]+x[4]+x[5]+x[6]+x[7]+x[8];  ma:=sum/8;    Assign(output, 'output.txt');  rewrite(output);  writeln(output, sum); writeln(output, ma);  Close(output);end.
Nadezhdachizhikova7968



Компьютерные технологии сегодня широко используются во всех областях человеческой деятельности. Знание предмета и основ информатики имеет большое значение в наши дни. Изучить информатику, в принципе, сможет любой желающий. Просто у кого-то это займёт меньше времени и сил, а у кого-то больше.

Поставьте для себя конкретные цели, которых вы хотите достичь, изучая информатику. Прежде всего, сделайте акцент на основные понятия и процессы. Когда вы оссвоите азы, обучение не будет требовать больших усилий. 

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Решить две . python, програмирование.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

aamer9992680
Stroeva19651938
vetviptime
Наталья
charlie79
lsyrbu
olma-nn477
serge-lysoff
danielianruz
ksen1280
nsn-2012
generallor3
Николаевна
satinvova
n-896458