Алгоритм с заданным условием проверки и переменной n (n:= - команда присвоения значения переменной)
Var
i,k,m:integer;
n:longint;
begin
Write('Введите количество чисел: '); Read(k);
m:=0;
Writeln('Вводите числа');
for i:=1 to k do
begin
Read(n);
if n mod 6 = 0 then inc(m)
end;
Writeln('Количество чисел, кратных 6, равно ',m)
end
<em><u>Тестовое решение:</u></em>
Введите количество чисел: 4
Вводите числа
3 18 26 24
Количество чисел, кратных 6, равно 2
Примеры:
1.
if (ivanov=0) or (petrov=1) then
begin
sidorov:=1;
end;
2.
if ivanov=0 then
begin
sidorov:=0;
end;
Плюсы моноблока:
1. больше экран и лучше качество изображения.
2. наличие сенсорного экрана и возможность подключения полноразмерной клавиатуры
3. Лучше мультимедийные возможности.
Моноблок это альтернатива современному компьютеру и телевизору.
Моноблок хорош там, где слишком мало рабочего места.
Его лучше выбрать когда дома на первом месте экономия пространства и красивый внешний вид.
Подходит для любителей фильмов, не увлекающихся слишком современными играми и не работающих с ресурсоемики приложениями, например, видио и фото редакторы.
<span>Если бы мне предложили компьютер</span><span> или </span>моноблок,<span> я бы выбрала </span>компьютер <span> из-за его </span><span>полной автономности.</span>