Дано целое число N. Необходимо вывести в столбик N раз сообщение Avada Kedavra . Формат входных данных - id1774315220200109 от Малая1806 09.01.2020 06:10

Question

Информатика: Дано целое число N. Необходимо вывести в столбик N раз сообщение Avada Kedavra . Формат входных данных С клавиатуры вводится единственное целое число N , (1≤N≤1000) . Формат выходных данных Необходимо вывести N строк с сообщением Avada Kedavra без кавычек. входные данные выходные данные 3 Avada Kedavra Avada Kedavra Avada Kedavra

Малая1806 · Accepted Answer

Для вычисления среднего учащихся, сдавших экзамен, нужно просмотреть все n=30 учащихся и найти сумму s и количество k для тех учащихся, которые набрали более а затем получить и вывести s/k с нужной точностью.

const
n=30;
var
x:array[1..n] of integer;
i,k,s: integer;
begin
Randomize;
Writeln('Результаты сдачи');
k:=0; s:=0;
for i:=1 to n do
begin
    x[i]:=Random(101);
    Write(x[i]:4);
    if x[i]>20 then begin s:=s+x[i]; Inc(k) end
end;
Writeln;
Writeln('Средний сдавших равен ',s/k:6:3)
end.

Тестовое решение:
Результаты сдачи
39 10 74 74 46 61 22 11   6 48 17 62 21 98 69 54 12   4 38 72 53 46 92 16 87 67 34 44 45 86
Средний сдавших равен 57.913

MOGZ ответил