Вэлек¬трон¬ную таб¬ли¬цу за¬нес¬ли ре¬зуль¬та¬ты сдачи нор¬ма¬ти¬вов по лёгкой ат¬ле¬ти¬ке среди уча¬щих¬ся 7-11 классов. на ри¬сун¬ке при¬ве¬де¬ны пер¬вые стро¬ки по¬лу¬чив¬шей¬ся таблицы: a b c d e f g 1 фамилия имя пол год рождения бег 1000 метров, мин. бег 30 метров, сек. прыжок в длину с места, см 2 пудова ксения ж 1997 4, 47 4, 12 209 3 гусева мария ж 1998 4, 47 5, 82 205 3 лелькова надежда ж 1999 5, 03 5, 24 198 5 тиль евгений м 1999 3, 32 5, 87 210 6 лиманина нелли ж 1998 5, 57 5, 32 182 в столб¬це а ука¬за¬на фамилия; в столб¬це в — имя; в столб¬це с — пол; в столб¬це d — год рождения; в столб¬це е — результаты в беге на 1000 метров; в столб¬це f — результаты в беге на 30 метров; в столб¬це g — результаты по прыж¬кам в длину с места. всего в элек¬трон¬ную таб¬ли¬цу были за¬не¬се¬ны дан¬ные по 1000 учащихся. выполните . откройте файл с дан¬ной элек¬трон¬ной таб¬ли¬цей (расположение файла вам со¬об¬щат ор¬га¬ни¬за¬то¬ры экзамена на ос¬но¬ва¬нии данных, со¬дер¬жа-щих¬ся в этой таблице, от¬веть¬те на два вопроса. 1. сколько про¬цен¬тов участ¬ни¬ков по¬ка¬за¬ло ре¬зуль¬тат по прыж¬кам в длину более 2 метров? ответ за¬пи¬ши¬те в ячей¬ку l1 таблицы. 2. найдите раз¬ни¬цу в се¬кун¬дах с точ¬но¬стью до де¬ся¬тых между сред¬ним ре¬зуль¬та¬том участ¬ни¬ков 1996 года рож¬де¬ния и сред¬ним ре¬зуль¬та¬том участ¬ни¬ков 1999 года рож¬де¬ния в беге на 30 метров. ответ на этот во-прос за¬пи¬ши¬те в ячей¬ку l2 таблицы
Ответы
Площадь трапеции определяется, как произведение полусуммы оснований на высоту трапеции. для определения высоты трапеции h по длинам её сторон (a,b,c,d, при этом a - большее основание, b - меньшее основание) в общем случае есть формула: var a, b, c, d, h, s: real; begin write('длина большего основания: '); readln(a); write('длина меньшего основания: '); readln(b); write('длины боковых сторон (через пробел): '); readln(c, d); h : = sqrt(sqr(c) - sqr((sqr(a - b) + sqr(c) - sqr(d)) / (2 * (a - ; s : = (a + b) / 2 * h; writeln('площадь трапеции равна ', s: 0: 4) end. тестовое решение: длина большего основания: 10 длина меньшего основания: 7 длины боковых сторон (через пробел): 3 5 площадь трапеции равна 23.4928
Var a: array[1.. 10000]of longint; n,i,j,min: integer; begin writeln('vvedite n'); readln(n); writeln('vvedit chisla'); for i: =1 to n do read(a[i]); min: =a[1]; for i: =1 to n do begin if min> a[i] then begin min: =a[i]; j: =i; end; end; write(i-1); end. если n будет больше то в описании увеличь размер массива там где подчеркнуто
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос: