с заданиями по информатике!
Нужны сообщения, желательно краткие на такие темы:

1.Условный оператор
2.Алгоритмы с обратной связью
3.Циклы

Алгоритм ищет НЕЧЕТНОЕ число КРАТНОЕ 13.

Чтобы остановить цикл, ввели переменную flag.

Когда условие выполнилось flag должно задаться значение 1.

Объяснение:

Алгоритм ищет НЕЧЕТНОЕ число КРАТНОЕ 13

Когда условие выполняется (находят нечетное число кратное 13), то цикл останавливают.

Чтобы остановить цикл, ввели переменную flag которая обозначает выполнение условия.

Когда условие выполнилось, то flag должно задаться значение вызывающие остановку цикла (в данной программе это число 1 которое присваивается flag).

язык программирования любой?

пишу на Python:

s = str(input())

s = sorted(s[:len(s)-1].split(', '))

for word in s:

print(word, ' ', end='')

Pascal:

var s, copy_s, word_s:string;

i, n, count:integer;

a:array of string ;

begin

count:=0;

write('Введите перечисление слов через запятую без пробелов, в конце поставьте точку: ');

readln(s);

copy_s:= s;

while pos(',', copy_s) > 0 do begin

n:= pos(',', copy_s);

delete(copy_s, n, 1);

count:=count+1;

end;

count:= count + 1;

SetLength(a, count);

for i:=1 to count-1 do begin

n:= pos(',', s);

word_s:= copy(s, 1, n-1);

delete(s, 1, n);

a[i]:=word_s;

end;

word_s:= copy(s, 1, length(s)-1);

a[count]:= word_s;

for i:=1 to count-1 do

if a[i] > a[i+1] then begin

word_s:=a[i];

a[i]:=a[i+1];

a[i+1]:=word_s;

end;

for i:=1 to count do

writeln(a[i]);

end.