Условие : дана непустая последовательность непустых слов из латинских букв; соседние слова отделены друг от друга запятой, за последним словом – точка. определить количество слов, которые начинаются и оканчиваются одной и той же буквой. код: program stroka; var s: string; i, k: integer; c: char; begin readln(s); c: =s[1]; for i: =1 to length(s) do begin if =', ') or (s[i]='.')) and (s[i-1]=c)) then begin inc(k); c: =s[i+1]; end; end; writeln(k); readln; end. код работает через раз. как я понял он сравнивает последнюю букву последнего слова, с самой первой буквой. исправить.

Program stroka;
var
  s: string;
  i, k: Integer;
  c: char;
begin
  ReadLn(s);
  c := s[1];
  i:=1;
  while i<=Length(s) do
    if (s[i]=',') or (s[i]='.') then
    begin
      if s[i-1]=c then Inc(k);
      if s[i]=',' then c := s[i + 1]
      else c:='.';
      i:=i+2
    end
    else Inc(i);
  Writeln(k);
  Readln
end.

Задача по расчету объемов информации.

Итак 1.5 Кб передаются за 210 секунд.  Переведем 1.5 Кб в байты 1кб=1024 байт

1.5 умножим на 1024 = 1536 байт.

Рассчитаем пропускную канала связи.

Для этого разделим объем на время.

1536/210

теперь

Узнаем скорость передачи второго файла.

Объем 512 байт, будет передаваться 512/(1536/210)=70 секунд.

Можно пойти другим путем и увидеть, что 512 это ровно в три раза меньше чем 1.5 кб и тогда понятно что файл, который имеет в три раза меньший размер будет передаваться в три раза быстрее, значит 210/3=70 секунд

70 секунд. 512/(1,5*1024/210)=70

◘Объективность информации. Например: "На улице холодно" - это субъективная информация. А "На улице -14°" - объективная (но не всегда точная)
◘Достоверность информации. Ин-фа достоверна, если отражает истинное положение дел. (объективная информация всегда достоверна)
◘Полнота информации. Информация полная, если ее достаточно для понимания и принятия решения.
◘Точность информации. Определяется степенью ее близости к реальному состоянию объекта, процесса, явления и т.д.
◘Актуальность информации – важность для настоящего времени.
◘Полезность информации.
 - Самая ценная информация – объективная, достоверная, полная, и актуальная.