Вопрос по информатике:
Одномерные массивы.
Найти количество элементов массива, больших квадрата первого элемента этого массива. Если таких элементов нет, выдать сообщение поиск неудачен.
- 04.08.2018 07:43
- Информатика
- remove_red_eye 11413
- thumb_up 46
Ответы и объяснения 1
Program abc;
const
arr: array [1..5] of integer = (5, 5, 26, 5, 30);
var
i, x: integer;
begin
x := 0;
for i := 2 to length(arr) do
begin
if sqr(arr[1]) < arr[i] then inc(x);
end; if x 0 then writeln(x)
else writeln('Поиск неудачен.');
end.
- 05.08.2018 17:51
- thumb_up 20
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.