Самое простое из того, что смог придумать. Перебираем числа до половины необходимого (больше нет смысла) (for i := 2 to number div 2 do) и ищем есть ли делители (number mod i = 0). Выводим сообщение.
var
number, i : integer;
begin
write('Число: ');
readln(number);
for i := 2 to number div 2 do
if number mod i = 0 then
begin
writeln('Число не является простым, оно делится, как минимум, на ', i);
Exit;
end;
writeln('Число является простым');
end.
Мы получили 1/10 всей информации т.к нам открыли 1 из 10-ти букв
так как mod это остаток от деления и так как четное число это то число которое делится на 2 без остатка то правильный ответ Г
Ответ:Процесор
Объяснение:Процесор имеет цастоту работи канали и количество ядер
500*400 = 200000 пикселей / 8 / 1024 = 24,4140625
80 кбайт / 24,4140625 = 3,2768 окргуляем в меньшую до целого = 3.
2^3 = 8 цветов