🔥ГДЗ под запретом?

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

Решение #1

Изображение ВАРИАНТ 31. В среде программирования создайте массив а из десяти случайных целых чисел, принадлежащих интервалу [0; 20). Выведите полученный массив на экран. Вычислите...
Дополнительное изображение

Рассмотрим вариант решения задания из учебника Босова, Босова, Лобанов 9 класс, Просвещение:
ВАРИАНТ 3
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
*Цитирирование задания со ссылкой на учебник производится исключительно в учебных целях для лучшего понимания разбора решения задания.
*К сожалению, временные проблемы с публикацией комментариев с мобильных устройств.