Втаблице запросы количества найденных по ним страниц некоторого сегмента сети интернет.
угол | прямая-180
угол-60
прямая-140
какое количество страниц (в тысячах) будет найдено по запросу угол & прямая?

укрытся одеялом и лечь спать,   и пить лекартва и остаться дома

если n это количество чисел, начинаем с 3

var

i,n,p: integer

begin

readln(n);

i: =3;

p: =1;

while i< =3*n do

begin

p: =p*i;

i: =i+3;

end;

writeln(p);

end.

если n это верхняя граница чисел

var

i,n,p: integer

begin

readln(n);

for i: =3 to n

if i mod 3 = 0 then

p: =p*i;

writeln(p);

end.

койка, стройка, трест, рой, репа, тройка, река, серп,строка.

первая программа считает сумму входящих в строку цифр стоящих на местах с нечетными номерами, начиная с первой, если это буква то вместо нее берется 0(ноль)

результат выполнения

аб2в457где245*ж0247025020

2) 

var s, r: string; i: integer;

begin readln(s); r : = ''; for i : = 1 to length(s) do if s[i] < > 'c' then r : = r + s[i]; writeln(r); end.