Готовые дипломные, курсовые, рефераты. Вы можете бес-платно скачать любую понравившуюся работу.
ГОТОВЫЕ РАБОТЫ
ПОХОЖИЕ ВОПРОСЫ
Сегодня примерно в 13:16 на наш email ящик поступил вопрос, который наши модераторы от-несли к категории Разное. Постараемся дать на него полноценный ответ.
Создать массив а из десяти целых чисел, принадлежащих промежутку [0;25). Вывестиполученный массив на экран. Подсчитать к - количество элементов массива, значение которых превышает 12.
Среди нашей команды есть эксперты, которые успешно отвечают на вопросы из рубрики "Информатика". Напомним, что вы задали следующий вопрос:
Создать массив а из десяти целых чисел, принадлежащих промежутку [0;25). Вывестиполученный массив на экран. Подсчитать к - количество элементов массива, значение которых превышает 12.
И сразу же ответим на него:
После проведенного совещания с другими специалистами нашего сервиса, мы склонны пола-гать, что правильный ответ на заданный вами вопрос будет звучать следующим образом:
Const n=10;
var a:array[1..n] of integer;
i,k:integer;
begin
randomize;
k:=0;
for i:=1 to n do begin
a[i]:=random(25);
if a[i]>12 then k:=k+1;
end;
for i:=1 to n do begin
write(a[i]); write(' '); end;
writeln(k); end.