menu
person

Задача №2899

Дан це­ло­чис­лен­ный мас­сив из 30 эле­мен­тов. Эле­мен­ты мас­си­ва

Поиск задачи:

Дан це­ло­чис­лен­ный мас­сив из 30 эле­мен­тов. Эле­мен­ты мас­си­ва могут при­ни­мать зна­че­ния от 150 до 200 – рост уча­щих­ся вы­пуск­но­го клас­са. В ко­ман­ду по ав­то­гон­кам вхо­дят все уча­щи­е­ся, чей рост не более 175 см. Га­ран­ти­ру­ет­ся, что такие уча­щи­е­ся в клас­се есть. Опи­ши­те на рус­ском языке или на одном из язы­ков про­грам­ми­ро­ва­ния ал­го­ритм, ко­то­рый на­хо­дит и вы­во­дит рост са­мо­го вы­со­ко­го участ­ни­ка го­ноч­ной ко­ман­ды. Ис­ход­ные дан­ные объ­яв­ле­ны так, как по­ка­за­но ниже. За­пре­ща­ет­ся ис­поль­зо­вать пе­ре­мен­ные, не опи­сан­ные ниже, но раз­ре­ша­ет­ся не ис­поль­зо­вать часть из них.

 

 

Бей­сик Пас­каль
N=30
 DIM A(N) AS INTEGER
 DIM I, J, MAX AS INTEGER
 FOR I = 1 TO N
 INPUT A(I)
 NEXT I
 ...
 END
const
 N=30;
 var
 a: array [1..N] of integer;
 i, j, max: integer;
 begin
 for i:=1 to N do readln(a[i]);
 ...
 end.
Си Ал­го­рит­ми­че­ский язык
#include <stdio.h>
#define N 30
void main(void)
{
int a[N];
int i, j, max;
for (i=0; iscanf("% d", &a[i]);
...
}
алг
нач
цел N = 30
цел­таб a[1:N]
цел i, j, max
нц для i от 1 до N
ввод a[i]
кц
...
кон
Есте­ствен­ный язык

Объ­яв­ля­ем мас­сив A из 30 эле­мен­тов.

Объ­яв­ля­ем це­ло­чис­лен­ные пе­ре­мен­ные I, J, MAX.

В цикле от 1 до 30 вво­дим эле­мен­ты мас­си­ва A с 1-го по 30-й.

...

 

В ка­че­стве от­ве­та не­об­хо­ди­мо при­ве­сти фраг­мент про­грам­мы (или опи­са­ние ал­го­рит­ма на есте­ствен­ном языке), ко­то­рый дол­жен на­хо­дить­ся на месте мно­го­то­чия. Вы мо­же­те за­пи­сать ре­ше­ние также на дру­гом языке про­грам­ми­ро­ва­ния (ука­жи­те на­зва­ние и ис­поль­зу­е­мую вер­сию языка про­грам­ми­ро­ва­ния, на­при­мер Borland Pascal 7.0) или в виде блок-схемы. В этом слу­чае вы долж­ны ис­поль­зо­вать те же самые ис­ход­ные дан­ные и пе­ре­мен­ные, какие были пред­ло­же­ны в усло­вии (на­при­мер, в об­раз­це, за­пи­сан­ном на есте­ствен­ном языке).

 

По­яс­не­ние.

Воз­мож­ный ва­ри­ант вер­но­го от­ве­та, при­ведённый на раз­лич­ных язы­ках про­грам­ми­ро­ва­ния.

 

 

 

Бей­сик Пас­каль
MAX = 150
 FOR I = 1 TO N
 IF A(I) <= 175 AND A(I) > MAX THEN
 MAX = A(I)
 ENDIF
 NEXT I
 PRINT MAX
max:=150;
 for i:=1 to N do
 if (a[i]<=175) and (a[i]>max) then
 max:=a[i];
 writeln(max);
Си Ал­го­рит­ми­че­ский язык
max=150;
for (i=0; iif (a[i]<=175 && a[i]>max)
max=a[i];
printf("% d", max);
max = 150
нц для i от 1 до N
если a[i]<=175 и a[i]> max
то max := a[i]
все
кц
вывод max
Есте­ствен­ный язык

За­пи­сы­ва­ем в пе­ре­мен­ную MAX на­чаль­ное зна­че­ние, рав­ное 150. В цикле от пер­во­го эле­мен­та до трид­ца­то­го срав­ни­ва­ем эле­мен­ты ис­ход­но­го мас­си­ва со 175. Если те­ку­щий эле­мент мень­ше или равен 175, то срав­ни­ва­ем зна­че­ние те­ку­ще­го эле­мен­та мас­си­ва со зна­че­ни­ем пе­ре­мен­ной MAX. Если те­ку­щий эле­мент мас­си­ва боль­ше MAX, то за­пи­сы­ва­ем в MAX зна­че­ние этого эле­мен­та мас­си­ва. Пе­ре­хо­дим к сле­ду­ю­ще­му эле­мен­ту. После за­вер­ше­ния цикла вы­во­дим зна­че­ние пе­ре­мен­ной MAX.

 

Категория: по информатике | Добавил: Просмотров: 1 | Теги: Ал­го­рит­мы обработки массивов | Рейтинг: 1.0/1
Всего комментариев: 0