Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
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.
скор передачи=объём файла/время,отсюда объём файла =скорость*время,т.е. 512000 * 16=8192000 бит,затем преводим все в кбайты: 8192000/8/1024=1000 кбайт
50*70*2 = 7000 байт вес одной страницы
2.8мб /1024 /1024 = 2`936`012,8 байт
2`936`012,8 байт /7000 байт = 419,4304 страниц
program d; var s : string; begins : = 'параллелограмм'; delete(s, 1, 9); delete(s, 3, 2); insert('о', s, 3); write(s); end.
Популярные вопросы