Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program xxx;
var n, c, d, e, k : integer;
begin
wtite ('введите 3-х значное число n =');
readln (n);
c : = n div 100;
d : = (n div 10) mod 10;
e : = n mod 10;
k: = 100*e + 10*d + c;
if n = k then write ('палиндром') else write('не палиндром')
end.
256 кбайт = 2^8 * 2^13 = 2^21 бит
2 мбайт = 2 * 2^23 = 2^24 бит
2^21 : 2^18 = 2^3 = 8 сек, потребуется для получения толей первых 256 кбайт
2^24 : 2^15 = 2^9 = 512 сек, потребуется мише чтобы скачать 2 мбайта
8 + 512 = 520 сек потребуется мише для получения информации
линейный (следования)
разветвляющийся (развилка)
циклический
v=331+0,6*(-35)=310 м/c
v=331+0,6*30=349 м/c
Популярные вопросы