Есть ответ 👍

Напишите программу, которая в последовательности натуральных чисел определяет количество и сумму всех чисел, кратных 7 и оканчивающихся на 2.

279
419
Посмотреть ответы 2

Ответы на вопрос:


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. определим сколько бит приходится на один пиксель (бит/пиксель): сколько цветов можно закодировать этим количеством пикселей (мощность алфавита):

Популярно: Информатика