Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
объем информации одного измерения будет равна 7 бит ();
станция сделала 8192 измерения - умножим на кол-во информации, необходимое для записи одного измерения: 8192*7=57344 бит=7168 байт = 7 килобайт
1.
program xxx;
var i, n : integer
begin
writeln ('введите число n=');
readln (n);
writeln ('делители числа: ');
for i: = 1 to n do
if n mod i = 0 then writeln (i);
readln
end.
b) 9 лет
2020=4
2011=4
var
s: string;
z,z1,i: integer;
readln(s);
z: =0;
z1: =0;
for i: =1 to length(s) do
if s[i]='м' then inc(z);
if s[i]='н' then inc(z1);
end;
if z> z1 then writeln('больше букв м');
if z< z1 then writeln('больше букв н');
if z=z1 then writeln('букв м и н равное количество');
Популярные вопросы