Проверку можно устроить, например, так. Пусть сначала i = 0, и в цикле увеличиваем i, пока не уйдем за границы массива или не встретим элемент, равный 7. После выхода из цикла проверяем, по какой причине был выход из цикла, и в зависимости от этого выводим либо номер элемента, либо сообщение об отсутствии семерок. При этом будет выведен только номер первой семерки, если их в массиве несколько.
Вывод массива можете дописать при необходимости самостоятельно, видимо, считается, что вы это умеете делать :)
Код (Pascal):
const
n = 20;
var
a: array[1..n] of integer;
i: integer;
begin
randomize;
for i := 1 to n do
a[i] := random(50) + 1;
i := 0;
repeat
i := i + 1;
until (i > n) or (a[i] = 7);
if i > n then
write('нет')
else
write(i)
end.
Поделитесь своими знаниями, ответьте на вопрос:
Информатика 11 класс составьте блок схемы для алгоритмов: 1) составить блок схему алгоритма определения закипит или нет вода, если пользователь введет температуру. 2)подсчитать количество четных и нечетных цифр в числе. 3)ввести число.если количество его разрядов меньше пяти, то вывести его на экран, дописав нули перед числом так, чтобы в итоге получилось пять знаков.если количество разрядов больше пяти, то вывести только первые пять разрядов.если число пятизначное, то вывести его как есть. 4) определить из каких цифр состоит число
160 Кбайт
Объяснение:
I = K * i
I - информационный объём изображения (размер файла, содержащего изображение)
K - количество точек (пикселей)
i - глубина цвета (число бит, используемых для записи цвета одного пикселя)
N =
N - количество цветов в палитре
i - глубина цвета (число бит, используемых для записи цвета одного пикселя)
Дано:
К = 1 280 * 1 024 = 1 310 720 пикселей
N = 2 цвета
Найти:
I (Кбайт)
2 =
2 = 2¹
i = 1 бит
I = 1 310 720 * 1 = 1 310 720 бит = 163 840 байт = 160 Кбайт
1 байт = 8 бит
1 Кбайт = 1024 байт