Приводим в бит- наименьшая единица информации
Приводим всё в биты:
1024 бит = 1024 бит
1000 байт = 8000 бит
1 бит = 1 бит
1 килобайт = 8192 бит
0,5 мегабайт = 4194304 бит
Ответ: 1)0,5 М.б 2)1 К.б 3)1000 байт 4) 1024 бит 5) 1 бит
Var n,p,k,s,i:integer;
begin
writeln(n);
readln(n);
writeln(p);
readln(p);
s:=0;
for i:=1 to n do
begin
writeln('введи число');
readln(k);
if (k mod p =0) then s:=s+1;
end;
writeln('ответ ',s);<span>
end.</span>
Юля использовала команду: 2) a2:=a div 10 mod 10;
1) a2:=a mod 10 div 10;
будет 0 в любом случае
число mod 10 = последней цифре числа
число div 10 - число без последней цифры, в случае однозначного числа - всегда будет 0
Например: (123 mod 10) div 10 = 3 div 10 = 0
2) a2:=a div 10 mod 10;
число div 10 = число без последней цифры
число mod 10 = последней цифре числа
Например: (123 div 10) mod 10 = 12 mod 10 = 2
3) a2:=a div 100 mod 10;
будет первая цифра трёхзначного числа
число div 100 = число без двух последних цифр, в случае трёхзначного числа - однозначное число
число mod 10 = последней цифре числа, в случае однозначного числа - самому числу
Например: (123 div 100) mod 10 = 1 mod 10 = 1
Ответ в файле с расширением *.txt, потому что файлы *.kum не отправляются