Найти количество учащихся, чей рост не превышает 175 см

@Артемидос · Регистрация: 15.11.2012

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

Добрый вечер, очень надеюсь на вашу помощь нужно решить, я думаю очень простую для вас, задачу.
Условие.
Дан целочисленный массив из 25 элементов, в котором записан рост учеников выпускного класса. Найти количество учащихся, чей рост не превышает 175 см. Если таких учащихся нет, сообщит об этом. Помогите пожалуйста, заранее спасибо!

@Jlovenpk1 · 15.11.2012, 20:15

Не ручаюсь, что правильно, но примерно так.
Жди, может еще кто решит.

Pascal

program kk;
const
n=25;
var
a:array[1..n] of integer;
i:integer;
begin
for i:=1 to n do
begin
a[i]:=random(180);
end;
if a[i]>175 then
writeln ('Нет таких')
else
if a[i]<175 then
writeln (' Ученики, чей роcт не превышает 175см  ');
writeln (a[i]);
readln
end.

@Артемидос · 15.11.2012, 21:43 **[ТС]**

Спасибо большое

@Jlovenpk1 · 15.11.2012, 21:50

Не за что)
Удачи)

@Артемидос · 15.11.2012, 21:59 **[ТС]**

У меня еще вопрос, когда получается 0 он должен писать что таких нет, но пишет все равно учащиеся, чей рост меньше 175 - 0
почему так?

@Jlovenpk1 · 15.11.2012, 22:05

Не самый хороший способ корректировки, но на скорую руку сделал.
Программа не знает, что делать если элементы вдруг равны 0 и пишут, что это ок рост.

Pascal

program kk;
const
n=25;
var
a:array[1..n] of integer;
i:integer;
begin
for i:=1 to n do
begin
a[i]:=random(180);
end;
if a[i]>175 then
writeln ('Нет таких')
else
if a[i]=0 then
writeln ('Нет таких')
else
if a[i]<175 then
writeln ('Ученики, чей рост не превышает 175см ');
writeln (a[i]);
readln
end.

@Артемидос · 15.11.2012, 23:05 **[ТС]**

Огромное тебе спасибо, как хорошо что еще есть такие люди)

@Jlovenpk1 · 15.11.2012, 23:49

не за что)

@Артемидос 0 / 0 / 0 Регистрация: 15.11.2012 Сообщений: 4
		1
	Найти количество учащихся, чей рост не превышает 175 см 15.11.2012, 19:32. Показов 3230. Ответов 7 Метки нет (Все метки) Добрый вечер, очень надеюсь на вашу помощь нужно решить, я думаю очень простую для вас, задачу. Условие. Дан целочисленный массив из 25 элементов, в котором записан рост учеников выпускного класса. Найти количество учащихся, чей рост не превышает 175 см. Если таких учащихся нет, сообщит об этом. Помогите пожалуйста, заранее спасибо! 0

@Артемидос 0 / 0 / 0 Регистрация: 15.11.2012 Сообщений: 4
	15.11.2012, 21:43 [ТС]	3
	Спасибо большое 0

@Jlovenpk1 C# Brain.net 35 / 35 / 7 Регистрация: 21.10.2012 Сообщений: 333 Записей в блоге: 12
	15.11.2012, 21:50	4
	Не за что) Удачи) 2

@Артемидос 0 / 0 / 0 Регистрация: 15.11.2012 Сообщений: 4
	15.11.2012, 21:59 [ТС]	5
	У меня еще вопрос, когда получается 0 он должен писать что таких нет, но пишет все равно учащиеся, чей рост меньше 175 - 0 почему так? 0

@Артемидос 0 / 0 / 0 Регистрация: 15.11.2012 Сообщений: 4
	15.11.2012, 23:05 [ТС]	7
	Огромное тебе спасибо, как хорошо что еще есть такие люди) 0

@Jlovenpk1 C# Brain.net 35 / 35 / 7 Регистрация: 21.10.2012 Сообщений: 333 Записей в блоге: 12
	15.11.2012, 23:49	8
	не за что) 0