1. Алгоритм атауы қайдан шыққан? A.Әл-Фарабидің латынша нұсқасынан В.Мұхаммед әл-Хорезми атының латынша айтылуы

С. Әл-Фарабидің арабша айтылуы D.Мұхаммед әл-Хорезми атының арабша айтылуы

E. Ағылшынның algorithm сөзінен

тест

Жила была девочка Настя.Она очень хотела научиться  рисовать.В школе на уроках  все смеялись над её рисунками и от  того  она приходила домой и плакала.Как то раз  Настя пришла  домой  вся заплаканная,включила  компьютер  и тут  на экран выскочил весёлый  человечек:

 -Не  плачь ,милая  девочка!Я тебе!Я живу  в твоём компьютере и  всегда с умилением  наблюдаю  за твоими занятиями.Пойдём  со мной!Не бойся !

Настя  приложила свою руку к компьютеру и тут же  оказалась по ту сторону  экрана

Дальше, Анастасия,  придумай пару  предложений  о путешествии их,если  понравилась идея и  на прощание человечек  подарит Насте программу  граф.редактор.И  всё  у неё будет  хорошо

Задача 1
var
s: string;
i: integer;
begin
readln(s);
for i:=2 to length(s)-2 do
 if (s[i-1]+s[i]+s[i+1]+s[i+2]=' не ') then s[i+1]:='и'
  else if ((s[i-1]+s[i]+s[i+1]='не ') and (i=2)) then s[i]:='и'
   else if ((s[i]+s[i+1]+s[i+2]=' не') and (i=length(s)-2)) then s[i+2]:='и';
write(s);
end.

Задача 2
var
s: string;
i, k: integer;
begin
readln(s);
for i:=2 to length(s)-1 do
 if s[i-1]+s[i]+s[i+1]=' в ' then inc(k)
  else if ((s[i-1]+s[i]='В ') or (s[i-1]+s[i]='в ')) and (i=2) then inc(k);
write(k);
end.

Если есть вопросы, пишите в ЛС :)