Напишите программу, которая в последовательности натуральных чисел определяет количество и сумму всех чисел, кратных 7 и оканчивающихся на 2.
279
419
Ответы на вопрос:
Program M1;
var s,x:integer;
begin
s:=0;
x:=1;
while x<>0 do
begin
read(x);
if (x mod 7=0) and (i mod 10=0) then s:=x+s;
end;
writeln('summa=',s);
end.
Объяснение:
Общий размер s = 13 кбайт = 13*1024 байт = 13 * 8 * 1024 бит. всего пикселей p = 256 * 104. определим сколько бит приходится на один пиксель (бит/пиксель): сколько цветов можно закодировать этим количеством пикселей (мощность алфавита):
Популярно: Информатика
-
Avenrop23612.09.2020 08:04
-
pavy198025.06.2023 03:47
-
alisa554027.11.2022 18:31
-
FiveKh12.04.2020 20:03
-
rederemin200604.07.2022 20:04
-
Tess8502.04.2021 19:53
-
kirinjindosh1209.11.2020 04:49
-
kisakz1220.02.2022 06:22
-
elenachemiris25.07.2022 05:31
-
staslukutin05.08.2020 22:38