Босова (Сам и контр)

Вариант 3 Контрольная работа 2 ГДЗ Самостоятельные и контрольные работы Босова 9 класс (Информатика)

Босова, Босова, Лобанов

9 класс

Автор

Босова, Босова, Лобанов

Оцени решение

← Предыдущий Следующий →

Сообщить об ошибке

Вариант 3 Контрольная работа 2 ГДЗ Самостоятельные и контрольные работы Босова 9 класс (Информатика)

Задача

1. В среде программирования создайте массив а из десяти случайных целых чисел, принадлежащих интервалу [0; 20). Выведите полученный массив на экран. Вычислите количество элементов массива, значения которых превышают среднее арифметическое значений его элементов.
Паскаль
var
s, k, i, sr: integer;
a: array [1..10]of integer;
begin
s := 0;
randomize;
for i := 1 to 10 do
begin
a[i] := random(21);
write(a[i], ‘ ‘);
s := s + a[i]
end;
sr := round(s / 10);
writeln(‘sr=’, sr);
k := 0;
for i := 1 to 10 do
if a[i] > sr then inc(k);
writeln(‘Количество элементов больше среднего = ‘, k)
end.
Python
from random import randint
n=10
a=[0]*n
for i in range(n):
a[i]=randint(0,20)
print(a[i],end=’ ‘)
sr=sum(a)/10
print(‘sr=’,sr)
k=0
for i in range(n):
if a[i] > sr:
k+=1
print(‘Количество элементов больше среднего’,k)
2. Дополнительное задание. Имеется металлическая проволока длиной L. Разработайте программу, определяющую, можно ли из проволоки такой длины сделать прямоугольник площадью S. С помощью программы рассчитайте длину а и ширину b этого прямоугольника или выведите на экран сообщение, что такой прямоугольник не существует. (Подсказка’, используйте квадратное уравнение.) Получите результат для L = 128 м и S = 1020 м2.
Для записи действий в задачах 1 и 2:
Выразить одну сторону прямоугольника через площадь и длину другой стороны:
S = a*b; b = S/a
Тогда периметр прямоугольника будет равен:
P = 2*a+2*b = 2*a+2*(S/a)=(2*a2+2*S)/a
Если подставить вместо периметра длину проволоки, то получившееся квадратное уравнение должно иметь один или два положительных корня.
L*a = 2*a2+2*S; 2*a2 – L*a + 2*S=0
Составить программу решения квадратного уравнения относительно a.
Паскаль:
var
s, l, d, x1, x2: real;
begin
write(‘Введи L и S > > ‘);
readln(l, s);
d := sqr(l) — 4 * 2 * 2 * s;
if d > = 0 then
begin
x1 := (l + sqrt(d)) / (2 * 2);
x2 := (l — sqrt(d)) / (2 * 2);
if (x1 > 0) or (x2 > 0) then
begin
if x1 > 0 then
writeln(‘a=’, x1, ‘ b=’, s / x1);
if x2 > 0 then
writeln(‘a=’, x2, ‘ b=’, s / x2);
end
else writeln(‘Прямоугольник не существует’)
end;
end.
Окно вывода:
Введи L и S > > 128 1020
a=34 b=30
a=30 b=34
Python
import math
l,s=map(float,input(‘Введи l и s > > ‘).split())
d = l*l — 4 * 2 * 2 * s
if d > = 0:
x1 = (l + math.sqrt(d)) / (2 * 2)
x2 = (l — math.sqrt(d)) / (2 * 2)
if (x1 > 0) or (x2 > 0):
if x1 > 0:
print(‘a=’,x1,’ b=’,s/x1)
if x2 > 0:
print(‘a=’,x2,’ b=’,s/x2)
else:
print(‘Прямоугольник не существует’)
Окно вывода:
Введи l и s > > 128 1020
a= 34.0 b= 30.0
a= 30.0 b= 34.0

Подробный ответ

Выполнение

1. Создадим массив из 10 случайных целых чисел на отрезке $$[0;20]$$, найдём сумму элементов, затем среднее арифметическое:

$$sr=\frac{s}{10}$$

После этого подсчитаем, сколько элементов массива больше среднего значения.

var
s, k, i, sr: integer;
a: array [1..10] of integer;
begin
  s := 0;
  randomize;
  for i := 1 to 10 do
  begin
    a[i] := random(21);
    write(a[i], ‘ ‘);
    s := s + a[i]
  end;
  sr := round(s / 10);
  writeln(‘sr=’, sr);
  k := 0;
  for i := 1 to 10 do
    if a[i] > sr then inc(k);
  writeln(‘Количество элементов больше среднего = ‘, k)
end.

from random import randint
n = 10
a = [0] * n
for i in range(n):
  a[i] = randint(0, 20)
  print(a[i], end=’ ‘)
sr = sum(a) / 10
print(‘sr=’, sr)
k = 0
for i in range(n):
  if a[i] > sr:
    k += 1
print(‘Количество элементов больше среднего’, k)

2. Пусть длина проволоки равна $$L$$, а стороны прямоугольника — $$a$$ и $$b$$. Тогда

$$S=ab,\quad b=\frac{S}{a}$$

Периметр прямоугольника:

$$L=2a+2b=2a+2\cdot\frac{S}{a}$$

Умножим на $$a$$:

$$La=2a^2+2S$$

Получаем квадратное уравнение относительно $$a$$:

$$2a^2-La+2S=0$$

Для $$L=128$$ м и $$S=1020$$ м$$^2$$:

$$2a^2-128a+2040=0$$

$$D=128^2-4\cdot2\cdot2040=16384-16320=64$$

$$a_{1,2}=\frac{128\pm\sqrt{64}}{4}=\frac{128\pm8}{4}$$

$$a_1=34,\quad a_2=30$$

Тогда

$$b=\frac{1020}{34}=30,\quad b=\frac{1020}{30}=34$$

Значит, прямоугольник существует.

var
  s, l, d, x1, x2: real;
begin
  write(‘Введи L и S >> ‘);
  readln(l, s);
  d := sqr(l) — 4 * 2 * 2 * s;
  if d >= 0 then
  begin
    x1 := (l + sqrt(d)) / (2 * 2);
    x2 := (l — sqrt(d)) / (2 * 2);
    if (x1 > 0) or (x2 > 0) then
    begin
      if x1 > 0 then
        writeln(‘a=’, x1, ‘ b=’, s / x1);
      if x2 > 0 then
        writeln(‘a=’, x2, ‘ b=’, s / x2);
    end
    else writeln(‘Прямоугольник не существует’)
  end;
end.

import math
l, s = map(float, input(‘Введи l и s >> ‘).split())
d = l * l — 4 * 2 * 2 * s
if d >= 0:
  x1 = (l + math.sqrt(d)) / (2 * 2)
  x2 = (l — math.sqrt(d)) / (2 * 2)
  if (x1 > 0) or (x2 > 0):
    if x1 > 0:
      print(‘a=’, x1, ‘ b=’, s / x1)
    if x2 > 0:
      print(‘a=’, x2, ‘ b=’, s / x2)
  else:
    print(‘Прямоугольник не существует’)