Var
    i, n, s, x: integer;

begin
    readln(n);

    s := 0;
    for i := 1 to n do
    begin
        readln(x);
        if (x mod 10 = 8) and (x mod 6 = 0) then
            s := s + x;
    end;

    writeln('S = ', s);
end.

0 0

4 года назад

Задание такое:надо определить функцию устройства ну например:клавиатура-ввод текстовых данных а слова такие:микрофон сканер мони

Emil Dee

Микрофон - вывод звуковой информации, сканер = ввод текстовой, графической и числовой информации, наушники - вывод звуковой информации, процессор - обработка числовой информации, принтер - вывод текстовой, числовой и графической информации

0 0

1 год назад

Кого или что называют исполнителем алгоритма? Помогите пожалуйста

Pryxy [140]

Это либо техническая,биологическая,биохимическая,реальная система, либо это устройство для управления

0 0

3 года назад

Прочитать ещё 2 ответа