С наступающим Новым годом! Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.91/11: Рейтинг темы: голосов - 11, средняя оценка - 4.91
Danilochka
1 / 1 / 0
Регистрация: 28.03.2011
Сообщений: 53
1

Определить, какой человек указан в списке раньше: самый старший или самый младший

25.10.2011, 18:25. Просмотров 2100. Ответов 1
Метки нет (Все метки)

Известен возраст группы людей в списке. Какой человек указан в списке раньше: самый старший или самый младший? (должны учитываться первые из людей одинакового возраста).
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.10.2011, 18:25
Ответы с готовыми решениями:

Определить, сколько стоит самый дешевый и самый дорогой обед
В столовой предлагается N комплексных обедов, состоящих из Q блюд . Известна...

Определить сколько человек имеют самый большой рост
В массиве хранится информация о росте 35 человек. Определить сколько человек...

Самый старший (на записи)
Дата=record число:1..31; месяц:1..12; ...

Перечисляемый тип данных. Определить какой месяц и на каком острове самый холодный
Условие: Даны следующие типы данных: type island= (barbados, gaiti, grenada,...

Поменять местами самый первый элемент массива и самый большой
Вводится какой-нибудь массив, поменять местами самый первый элемент массива и...

1
Puporev
Модератор
55494 / 42589 / 29435
Регистрация: 18.05.2008
Сообщений: 100,744
26.10.2011, 12:05 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
uses crt;
const nmax=20;
var a:array[1..nmax] of byte;
    n,i,imn,imx:integer;
begin
repeat
write('Размер массива до ',nmax,' n=');
read(n);
until n in [1..nmax];
writeln('Введите возраст людей:');
for i:=1 to n do
 begin
  write(i,'=');
  read(a[i]);
 end;
imn:=1;
imx:=1;
for i:=1 to n do
 begin
  if a[i]<a[imn] then imn:=i;
  if a[i]>a[imx] then imx:=i;
 end;
writeln('Самый младший номер ',imn);
writeln('Самый старший номер ',imx);
if imn<imx then write('Младший указан раньше')
else write('Старший указан раньше');
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.10.2011, 12:05

В двумерном массиве найти самый длинный и самый короткий элемент
В двумерном массиве найти самый длинный и самый короткий элемент

Найти среднее арифметическое компонент массива, удалив самый большой и самый маленький элементы
Найти среднее арифметическое компонент массива , убрав самый большой и самый...

Включить в программу функцию, возвращающую true, если самый высокий ученик имеет и самый большой все, и fal
Включить в программу функцию, возвращающую true, если самый высокий ученик...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru