Заполните случайными числами в диапазоне от 1 до 50 массив B [1:20]. Какое количество раз встречается число 4 в данном массиве? Вывести сообщение на экран: Число 4 встречается в массиве _____ раз. Если такого числа нет, то вывести на экран сообщение об этом.
ПОЖАЛУЙСТА)
Ответы
Ответ дал:
2
// PascalABC.Net
var a: array [1..20] of integer;
i, count: integer;
begin
for i := 1 to 20 do
begin
a[i] := random(1, 50);
write(a[i]:4);
end;
writeln();
count := 0;
for i := 1 to 20 do
begin
if a[i] = 4 then
inc(count);
end;
writeln('Число 4 встречается в массиве ', count, ' раз.');
end.
math65:
здравствуйте помогите мне пожалуйста по информатике вопрос уже задала
Вас заинтересует
1 год назад
2 года назад
2 года назад
8 лет назад