var n : integer; beginreadln (n); case n of1, 2, 12 : writeln ('зима'); 3, 4, 5 : writeln ('весна'); 6, 7, 8 : writeln ('лето'); 9, 10, 11 : writeln ('осень'); end; end.
Ответ дал: Гость
а после 18 какое число идет? ? если 108 ,то тогда получается так 2*3=6, 3*6=18, 6*18=108,получается что первое число умножается на второе,второе на третье,третье на четверное и т.д
Ответ дал: Гость
var
n,i,z: integer;
begin
readln(n);
for i: =1 to n do if n mod i=0 then inc(z,i);
writeln(z);
end.
Ответ дал: Гость
мощность n=16
n=2^i где i-количество информации в символе
тогда i=4
информационный объем i равен i*k где k - количество символов в тексте
Популярные вопросы