Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
50зн=50байт
60зн=60байт
1кбайт= 1024байта
1мб=1024кбайта
=> 1мбайт=(1024*1024)байт
1мбайт=1048576 байт
50байт/1048576байт=0,0000476837мбайт
60байт/1048576байт=0,0000572205мбайт
var
i,j,k: integer;
s,p: string;
begin
p: ='abcdefghijklmnopqrstuvwxyzабвгдеёжзийклмнопрстуфхцчшщъыьэюя';
readln(s);
k: =0;
for i: =1 to length(s) do
for j: =1 to length(p) do
if s[i]=p[j] then k: =k+1;
writeln(k);
end.
n,a: integer;
readln(n);
a: =(n mod 10)*1000+((n mod 100) div 10)*100 + ((n mod 1000) div 100)*10+ n div 1000;
if n> a then
writeln('число ', n, ' больше перевертыша ', a)
else
writeln('перевертыш ', a, ' больше числа ', n);
2 единицы в двоичной записи числа 1025
10000000001
Популярные вопросы