Известен возраст и количество конкурсантов.Определить сколько среди участников детей старше 15 лет.
5-9 класс
|
uses crt;
const n=1000;
var a:array[1..n] of integer;
i,k,s:integer;
begin
randomize;
readln(k);
writeln;
s:=0;
for i:=1 to k do
begin
a[i]:=random(20);
writeln(a[i]);
if a[i]>15 then inc(s);
end;
writeln;
writeln(s);
end.
Другие вопросы из категории
страниц содержал переданный текст если известно что информационный вес одного символа равен 8 битам а на одной странице 48 символов
ОТВЕТ ПОЛНЫЙ плиз
Б)_______Кбайт=_____байт=12888бит
В)_______Кбайт=_____байт=8192бит
Г)_______Гбайт=1536Мб=_____Кбайт
Д)12Кбайт=_____байт=_____бит
Е)6Кбайт=_____байт
Ж) 94 Мбайта=________Кбайт
З) 107 Гбайт=_____Мбайт=______байт
И) 5242880Кбайт=_______Гбайт
Перевести!
Читайте также
натуральных двузначных чисел. Определить
среднее арифметическое нечетных чисел;
№3 С клавиатуры вводятся 10 натуральных двузначных чисел. Определить
верно ли, что среди введенных чисел есть число, в котором первая цифра в два раза больше последней.
составить алгоритм с циклом с условием