Тот, кто работает в сфере услуг, знает — без ведения записи клиентов никуда. Мало того, что нужно видеть свое раписание,
но и напоминать клиентам о визитах тоже. Нашли самый бюджетный и оптимальный вариант: сервис VisitTime.
Для новых пользователей первый месяц бесплатно.
Чат-бот для мастеров и специалистов, который упрощает ведение записей:
— Сам записывает клиентов и напоминает им о визите;
— Персонализирует скидки, чаевые, кешбек и предоплаты;
— Увеличивает доходимость и помогает больше зарабатывать;
Вы создали или только планируете создать свой сайт, но не знаете, как продвигать?
Продвижение сайта – это не просто процесс, а целый комплекс мероприятий,
направленных на увеличение его посещаемости и повышение его позиций в поисковых системах.
Ускорение продвижения
Если вам трудно попасть на первые места в поиске самостоятельно, попробуйте технологию Буст,
она ускоряет продвижение в десятки раз, а первые результаты появляются уже в течение первых 7 дней.
Если ни один запрос у вас не продвинется в Топ10 за месяц, то в SeoHammer за бустер вернут деньги.
3.90 4.АДЕПТ 5.121211 6. 1)a=0 b=0 x=0. 2)readln(x) 3)var a,b,x:real; begin readln(a,b); if a =0 then if b=0 then write('любое число'); else write('нет решений') else write('x= ',-b/a); end.
С4 вар1 var sh,bal:array[1..99] of integer; s:char; i,k,N,max,ball,numsh,kol:integer;
begin for i:=1 to 99 do begin sh[i]:=0; bal[i]:=-1; end; readln(N); for i:=1 to N do begin repeat read(s); until s=' '; repeat read(s); until s=' '; readln(numsh,ball); if ball>bal[numsh] then bal[numsh]:=ball; sh[numsh]:=sh[numsh]+1; end; kol:=0; max:=-1; for i:=1 to 99 do if bal[i]>max then max:=bal[i]; for i:=1 to 99 do if max=bal[i] then kol:=kol+1; writeln(kol); end.
Не уверен что совсем правильно,если есть идеи подскажите как доработать