Вопрос по информатике:
Помогите!!!!!! Очень Срочно!!!!!!!!
Дан одномерный массив целых чисел. Найдите, сколько раз в нем повторяется число K.Заполните случайным образом.
- 01.08.2018 01:22
- Информатика
- remove_red_eye 8365
- thumb_up 23
Ответы и объяснения 1
Var
a: array [1..10] of integer;
i, k, s: integer;
begin
write('K = ');
readln(k);
for i:=1 to 10 do
begin
a[i]:=random(11);
writeln('a[', i, '] = ', a[i]);
if a[i]=k then s+=1;
end;
write(k, ' повторяется ', s, ' раз')
end.
- 02.08.2018 01:43
- thumb_up 39
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.