Выше в табличной форме представлен фрагмент базы данных о составе воды в термальных источниках на Камчатке.

Сколько записей в данном фрагменте удовлетворяют условию:

(Угольная кислота = насыщ.) И (Температура > 40) ИЛИ (Минерализация < 3)?

Попробуй ответ 3

program xxx;

      var i, x, s : integer;

begin

  write('введите число х=');

  readln(x);

  s: =0

  i: =1

  while i < =x do

      begin

          s: =s+i;

          i: =i+2

      end;

  write('сумма нечетных чисел ='; s);  

  readln

end.

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.