Определить количество холостых мужчин в возрасте старше 60 лет

@Александр08 · Регистрация: 05.12.2015

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

Определить количество холостых мужчин в возрасте старше 60 лет.
нужно написать прогу (В паскале)
вот задание: В автоматизированной инф. системе содержатся анкетные данные сотрудников учреждения.
В массиве А(8) содержаться года рождение сотрудников;
В массиве В(8) сведения о поле;
В массиве S(8) сведения о семейном положении;
Элемент массива А с номером N- год рождения сотрудника N
Элемент массива В с номером N- сведения о поле сотрудника N
Элемент массива S с номером N- сведения о семейном положении сотрудника N
P(N)=0, сотрудник N женского пола
P(N)=1, сотрудник N мужского пола

S(N)=0 сотрудник N холост(не замужем)
S(N)=0 сотрудник N женат (замужем)

@vint-81 · 05.12.2015, 19:37

Сообщение от Александр08

S(N)=0 сотрудник N холост(не замужем)
S(N)=0 сотрудник N женат (замужем)

вот гад...

Pascal

1
2
3

sum:=0;god:=2015;
for i:=1 to 8 do if (god-a[i]>60)and(b[i]=1)and(s[i]=0) then inc(sum);
writeln(sum);

@Александр08 · 05.12.2015, 20:22 **[ТС]**

sum:=0;god:=2015;
for i:=1 to 8 do if (god-a[i]>60)and(b[i]=1)and(s[i]=0) then inc(sum);
writeln(sum);[/quote]
Определить количество холостых мужчин в возрасте старше 60 лет.
нужно написать прогу (В паскале)
вот задание: В автоматизированной инф. системе содержатся анкетные данные сотрудников учреждения.
В массиве А(8) содержаться года рождение сотрудников;
В массиве В(8) сведения о поле;
В массиве S(8) сведения о семейном положении;
Элемент массива А с номером N- год рождения сотрудника N
Элемент массива В с номером N- сведения о поле сотрудника N
Элемент массива S с номером N- сведения о семейном положении сотрудника N
P(N)=3, сотрудник N женского пола
P(N)=5, сотрудник N мужского пола

S(N)=5 сотрудник N холост(не замужем)
S(N)=3 сотрудник N женат (замужем)

@ZX Spectrum-128 · 07.12.2015, 20:39

Запрещено создавать темы с множеством вопросов во всех разделах, кроме разделов платных услуг. Один вопрос - одна тема.

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

Александр08, дубль вашей темы удален.

@Александр08 0 / 0 / 0 Регистрация: 05.12.2015 Сообщений: 3
		1
	Определить количество холостых мужчин в возрасте старше 60 лет 05.12.2015, 19:21. Показов 1454. Ответов 3 Метки нет (Все метки) Определить количество холостых мужчин в возрасте старше 60 лет. нужно написать прогу (В паскале) вот задание: В автоматизированной инф. системе содержатся анкетные данные сотрудников учреждения. В массиве А(8) содержаться года рождение сотрудников; В массиве В(8) сведения о поле; В массиве S(8) сведения о семейном положении; Элемент массива А с номером N- год рождения сотрудника N Элемент массива В с номером N- сведения о поле сотрудника N Элемент массива S с номером N- сведения о семейном положении сотрудника N P(N)=0, сотрудник N женского пола P(N)=1, сотрудник N мужского пола S(N)=0 сотрудник N холост(не замужем) S(N)=0 сотрудник N женат (замужем) 0

@Александр08 0 / 0 / 0 Регистрация: 05.12.2015 Сообщений: 3
	05.12.2015, 20:22 [ТС]	3
	sum:=0;god:=2015; for i:=1 to 8 do if (god-a[i]>60)and(b[i]=1)and(s[i]=0) then inc(sum); writeln(sum);[/quote] Определить количество холостых мужчин в возрасте старше 60 лет. нужно написать прогу (В паскале) вот задание: В автоматизированной инф. системе содержатся анкетные данные сотрудников учреждения. В массиве А(8) содержаться года рождение сотрудников; В массиве В(8) сведения о поле; В массиве S(8) сведения о семейном положении; Элемент массива А с номером N- год рождения сотрудника N Элемент массива В с номером N- сведения о поле сотрудника N Элемент массива S с номером N- сведения о семейном положении сотрудника N P(N)=3, сотрудник N женского пола P(N)=5, сотрудник N мужского пола S(N)=5 сотрудник N холост(не замужем) S(N)=3 сотрудник N женат (замужем) 0

	07.12.2015, 20:39