результат работы алгоритма представлен в таблице Восстанови алгоритмы преобразования представленной блок-схеме при таблицы и заполни таблицу недостающими значениями .
1941 жылдың 26 маусымында Радошкович деревнясының тұсында болған шайқаста қазақстандық батыр Бақтыораз Бейсекбаевтың қаһармандығы көпке дейін айтылмай келді. Ол отқа оранып, жанып бара жатқан ұшағын жердегі кеңес жауынгерлеріне шабуылдаушы неміс техникаларына қарсы бағыттаған ұшқыш Александр Маслов экипажының құрамында болған еді. Аңызға бергісіз осынау өшпес ерлік біразға дейін даңқты ұшқыш Николай Гастеллоға телініп келген-ді. Алайда, тарихи шындық елге аян болды. Қазір бұл жерде арнайы мұражай бар. «Әуе отты таран» мұражайында 100-ден астам жәдігер жинақталған. Солардың бірі – Бақтыораз Бейсекбаевтан қалған пулемет. Бұл қаруды соғыс жәдігерін іздеушілер ұшақтың құлаған жерінен тапқан.
ҚАНДЫ ШАЙҚАС – КӨЗ АЛДЫҢДА
Әлемнің 13 мемлекеті қатысқан халықаралық әскери шара Беларуссияның Брест қаласында өтті. «Брест қамалы – 1941 жыл, 22 маусым» деп аталатын фестиваль осымен алтыншы рет өткізілді. Осыдан тура 75 жыл бұрын Ұлы Отан соғысы дәл осы Брест қамалын қорғаудан басталған болатын. Халықаралық фестивальға 500-ден астам адам қатысты. Олардың қатарында қазақстандық «Атырау-Брест» экспедициясының сарбаздары да болды. Отан соғысының алғашқы күнінде Гитлердің жоспары бойынша Брест қамалын 8 сағатта жаулап алып, әрі қарай Кеңес Одағының территориясына емін-еркін өту еді. Неміс әскері біздің жауынгерлердің тегеурінді қарсылығына тап болды. Жан аямай соғысқан ерлердің арасында қазақстандықтар да аз болмады.
Преобразуем условие в более понятное. Обозначаем: a=Первая буква согласная; b=Вторая буква согласная c=Третья буква гласная Тогда условие можно записать следующим образом: Перейдем к исходным обозначениям, учтя, что отрицание "гласная" есть "согласная", а отрицание "согласная" есть "гласная": (Первая буква гласная ИЛИ Вторая буква гласная) И Третья буква согласная. Можно сформулировать еще короче: "Первая ИЛИ вторая буква гласная, а третья обязательно согласная". Этому условию удовлетворяет только имя 4) Лидия - в нем вторая буква гласная, а третья согласная.
Общее решение, позволяющее удалять из строк любой "мусор"
// PascalABC.Net 3.0, сборка 1066 procedure CheckString(var s:string; var n:integer); var i:integer; begin i:=Length(s); while i>0 do begin if not(s[i] in ['a'..'z']) then Delete(s,i,1); Dec(i) end; n:=Length(s) end;
var s1,s2:string; i,p,n1,n2:integer; begin Write('Введите первую строку: '); Readln(s1); CheckString(s1,n1); if n1=0 then Writeln('Введенная строка не содержит допустимых символов') else begin Write('Введите вторую строку: '); Readln(s2); CheckString(s2,n2); if n2=0 then Writeln('Введенная строка не содержит допустимых символов') else { теперь обе строки содержат только маленькие латинские буквы } if n1=n2 then begin for i:=1 to n1 do begin p:=Pos(s1[i],s2); if p=0 then Break else Delete(s2,p,1) end; if Length(s2)=0 then Writeln('Решение имеется') else Writeln('Решения нет') end else Writeln('Решения нет'); end end.
Тестовое решение: Введите первую строку: this is my own deal! Введите вторую строку: Тест: *is now=l2ead my sthi? Решение имеется
Также имеется современное решение, которому пока что в школах не учат: // PascalABC.Net 3.0, сборка 1066 begin var s1:=ReadString('Введите первую строку: ').Where(x->x in ['a'..'z']); if s1.Count=0 then Writeln('Введенная строка не содержит допустимых символов') else begin var s2:=ReadString('Введите вторую строку: ').Where(x->x in ['a'..'z']); if s2.Count=0 then Writeln('Введенная строка не содержит допустимых символов') else if s1.Except(s2).Count>0 then Writeln('Решения нет') else Writeln('Решение имеется') end end.
ҚАНДЫ ШАЙҚАС – КӨЗ АЛДЫҢДА
Әлемнің 13 мемлекеті қатысқан халықаралық әскери шара Беларуссияның Брест қаласында өтті. «Брест қамалы – 1941 жыл, 22 маусым» деп аталатын фестиваль осымен алтыншы рет өткізілді. Осыдан тура 75 жыл бұрын Ұлы Отан соғысы дәл осы Брест қамалын қорғаудан басталған болатын. Халықаралық фестивальға 500-ден астам адам қатысты. Олардың қатарында қазақстандық «Атырау-Брест» экспедициясының сарбаздары да болды. Отан соғысының алғашқы күнінде Гитлердің жоспары бойынша Брест қамалын 8 сағатта жаулап алып, әрі қарай Кеңес Одағының территориясына емін-еркін өту еді. Неміс әскері біздің жауынгерлердің тегеурінді қарсылығына тап болды. Жан аямай соғысқан ерлердің арасында қазақстандықтар да аз болмады.