тогда время передачи будет равно t= 100/12800 = 0,0078125 секунд
Ответ дал: Гость
var s : string; symb : char; i : longint; begin readln(s); readln(symb); if pos(symb,s)=0 then writeln('в этом слове нет этого символа') else begin i: =0; while pos(symb,s)< > 0 do begin write(pos(symb,s)+i,' '); i: =i+1; delete(s,pos(symb,s),1); end; end; writeln; writeln(i); end.
Ответ дал: Гость
1695-1696 – пётр первый делал свои знаменитые азовские походы.
1703 – пётр первый основал санкт-петербург. событие произошло 16 мая.
1709 – была полтавская битва, она произошла 27 июня.
пе́рвая мирова́я война́(28 июля 1914 — 11 ноября 1918 гг)
Ответ дал: Гость
паскаль же?
var s, x: string; c, n, err, i, d, k: integer; begin readln (s); n: =length(s); for i: =1 to n do begin
Популярные вопросы