Отпечатать номера групп, где отличников более 15% и число таких групп

@go6pbIu_6o6puK · Регистрация: 07.12.2013

Студворк — интернет-сервис помощи студентам

Дана матрица из 2 столбцов и 10 строк. Первый элемент каждой стоки представляет общее число студентов, а второй число отличников в одной из десяти групп. Номер строки соответствует номеру группы на учебном потоке. Отпечатать номера групп, где отличников более 15% и число таких групп.
Помогите пожалуйста
Буду очень благодарен

@ПерС · 07.12.2013, 18:21

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
const a: array [1..10,1..2] of integer = (
 (20,2), (13,7), (23,2), (11,4), (19,2),
 (25,5), (16,2), (15,3), (21,2), (22,36)
);
var i,k:integer;
begin
 write ('Номера групп ');
 k:=0;
 for i:=1 to 10 do if a[i,2]/a[i,1]>0.15 then begin
  inc(k);
  write (i,' ');
 end;
 writeln;
 write ('Всего групп: ',k);
 readln;
end.

Номера групп 2 4 6 8 10
Всего групп: 5

@go6pbIu_6o6puK · 07.12.2013, 18:27 **[ТС]**

ПерС, Огромное спасибо

@go6pbIu_6o6puK · 09.12.2013, 19:48 **[ТС]**

Как изменить программу, чтобы данные вводились после запуска

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
const a: array [1..10,1..2] of integer = (
 (20,2), (13,7), (23,2), (11,4), (19,2),
 (25,5), (16,2), (15,3), (21,2), (22,9)
);
var i,k:integer;
begin
 write ('Номера групп ');
 k:=0;
 for i:=1 to 10 do if a[i,2]/a[i,1]>0.15 then begin
  inc(k);
  write (i,' ');
 end;
 writeln;
 write ('Всего групп: ',k);
 readln;
end.

@Puporev · 09.12.2013, 19:59

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
uses crt;
const a: array [1..10,1..2] of integer = (
 (20,2), (13,7), (23,2), (11,4), (19,2),
 (25,5), (16,2), (15,3), (21,2), (22,9));
var i,k:integer;
begin
clrscr;
for i:=1 to 10 do
 begin
  for k:=1 to 2 do
  write(a[i,k]:3);
  writeln
 end;
writeln('Номера групп ');
k:=0;
for i:=1 to 10 do
if a[i,2]/a[i,1]>0.15 then
 begin
  inc(k);
  write (i,' ');
 end;
writeln;
write ('Всего групп: ',k);
readln;
end.

@go6pbIu_6o6puK · 09.12.2013, 20:44 **[ТС]**

Puporev, не работает
Это программа сделана по задаче:
Дана матрица из 2 столбцов и 10 строк. Первый элемент каждой стоки представляет общее число студентов, а второй число отличников в одной из десяти групп. Номер строки соответствует номеру группы на учебном потоке. Отпечатать номера групп, где отличников более 15% и число таких групп.
Как сделать так, чтобы число студентов и отличников вводилось после запуска программы?
Типо ты запускаешь и программа такая: введите число студентов и отличников))

Добавлено через 6 минут
Puporev, ты просто не так понял))

@ermolay · 09.12.2013, 21:25

Комментарий модератора

сообщения #4, #5, #6 перенесены из другой темы.
go6pbIu_6o6puK,
Дублирование темы, а также кросспостинг (создание одинаковых тем в разных разделах) запрещены правилами форума. Не возбраняется "поднимать" тему, то есть написать в теме "тема/задача/проблема актуальна", но с разумной периодичностью.
Вопросы по решению задавайте в исходной теме.

@go6pbIu_6o6puK · 09.12.2013, 23:55 **[ТС]**

Уже не надо я сам разобрался

Новые блоги и статьи Все статьи Все блоги /
Перемещение выделенных строк ТЧ из одного документа в другой Maks 30.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .

@go6pbIu_6o6puK 1 / 1 / 0 Регистрация: 07.12.2013 Сообщений: 7

	Отпечатать номера групп, где отличников более 15% и число таких групп 07.12.2013, 17:49. Показов 1246. Ответов 7 Метки нет (Все метки) Дана матрица из 2 столбцов и 10 строк. Первый элемент каждой стоки представляет общее число студентов, а второй число отличников в одной из десяти групп. Номер строки соответствует номеру группы на учебном потоке. Отпечатать номера групп, где отличников более 15% и число таких групп. Помогите пожалуйста Буду очень благодарен 0

@go6pbIu_6o6puK 1 / 1 / 0 Регистрация: 07.12.2013 Сообщений: 7
	07.12.2013, 18:27 [ТС]
	ПерС, Огромное спасибо 0

@go6pbIu_6o6puK 1 / 1 / 0 Регистрация: 07.12.2013 Сообщений: 7
	09.12.2013, 20:44 [ТС]
	Puporev, не работает Это программа сделана по задаче: Дана матрица из 2 столбцов и 10 строк. Первый элемент каждой стоки представляет общее число студентов, а второй число отличников в одной из десяти групп. Номер строки соответствует номеру группы на учебном потоке. Отпечатать номера групп, где отличников более 15% и число таких групп. Как сделать так, чтобы число студентов и отличников вводилось после запуска программы? Типо ты запускаешь и программа такая: введите число студентов и отличников)) Добавлено через 6 минут Puporev, ты просто не так понял)) 0

@go6pbIu_6o6puK 1 / 1 / 0 Регистрация: 07.12.2013 Сообщений: 7
	09.12.2013, 23:55 [ТС]
	Уже не надо я сам разобрался 0