DashkaGamayunova
15.08.2021 06:25

В Exel
задание 2

Создайте таблицу “Озера Европы”, используя следующие данные по
площади (кв. км) и наибольшей глубине (м): Ладожское 17 700 и 225;
Онежское 9510 и 110; Каспийское море 371 000 и 995; Венерн 5550 и 100;
Чудское с Псковским 3560 и 14; Балатон 591 и 11; Женевское 581 и 310;
Веттерн 1900 и 119; Боденское 538 и 252; Меларен 1140 и 64. Определите
самое большое и самое маленькое по площади озеро, самое глубокое и самое
мелкое озеро.

3 задание

Создайте таблицу “Реки Европы”, используя следующие данные длины (км)
и площади бассейна (тыс. кв. км): Волга 3688 и 1350; Дунай 2850 и 817; Рейн
1330 и 224; Эльба 1150 и 148; Висла 1090 и 198; Луара 1020 и 120; Урал 2530
и 220; Дон 1870 и 422; Сена 780 и 79; Темза 340 и 15. Определите самую
длинную и самую короткую реку, подсчитайте суммарную площадь
бассейнов рек, среднюю протяженность рек европейской части России.

4 задание

В банке производится учет своевременности выплат кредитов, выданных
нескольким организациям. Известна сумма кредита и сумма, уже
выплаченная организацией. Для должников установлены штрафные санкции:
если фирма выплатила кредит более чем на 70 процентов, то штраф составит
10 процентов от суммы задолженности, в противном случае штраф составит
15 процентов. Посчитать штраф для каждой организации, средний штраф,
общее количество денег, которые банк собирается получить дополнительно.
Определить средний штраф бюджетных организаций.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
1903vita
29.08.2022 04:01
Const 
n=5;

Var
 ar:array[1..n] of integer;
 ar2:array[1..n] of integer;
 i,k:integer;

 function prost(a:integer):boolean;
 var i:integer;
 b:boolean;
  begin
  b:=true;
   for i:=2 to a div 2 do
    if a mod i=0 then
     begin;
      b:=false;
      break;
     end;
   if a=1 then b:=false;
  prost:=b;
 end;

  begin;
 randomize;
 k:=0;
  for i:=1 to n do
   begin;
    ar[i]:=random(101);
    write(ar[i]:4);
   end;
  writeln;
  for i:=1 to n do
  if prost(ar[i]) then
   begin;
    inc(k);
    ar2[k]:=ar[i];
    write(ar2[k]:4);
   end;
end.
0,0(0 оценок)
Ответ:
sergooopoop
19.10.2022 18:17

#arr = [*map(int, input().split(' 0')[0].split())]  если числа вводятся в строчку , то раскомментируйте и используйте эту строку, а инициализацию массива arr и цикл while закомментируйте

arr = []

while 1:

   tmp = int(input())

   if tmp != 0:  # Читаем сколько угодно чисел пока не будет ноль

       arr.append(tmp)

   else:

       break

s = 0  # сумма двузначных чисел

k = 0  # количество двузначных чисел

for i in arr:

   if 10 <= i <= 99:  # итерируемся по циклу и если число двузначное

       s += i  # то прибавляем его к сумме

       k += 1  # счетчик двузначный чисел увеличиваем на один

print(s/k) if k > 0 else print('NO') #если количество двузначных > 0 то выводим среднее арифметическое s/k, если нет то выводим NO

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