Вопрос по информатике:
Считайте рост претендента в команду случайным числом из диапазона от 150 до 200 см,а число претендентов n=50. сделать программу на языке Паскаля
Ребят,срочно.оценка за четверть решается
- 25.07.2016 07:25
- Информатика
- remove_red_eye 4066
- thumb_up 14
Ответы и объяснения 1
Program basket;
const
n:=50;
var
i, pl : integer;
hig: array [1..50] of integer;
begin
for i:= 1 to n do
begin
hig[i]:= random(51)+150;
writeln('Рост ', i, '-го игрока - ', hig[i]);
if hig[i]>=170 then pl:=pl+1
end;
writeln(pl, ' претендентов.')
end.
- 26.07.2016 17:01
- thumb_up 31
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.