Конвертируйте из Паскаля в Си Исходное задание: Дана строка. Указать те слова, которые содержат хотя бы одну букву k. var s,tmp:string;
i,n:integer;
flag,word:boolean;
function letter (const let:char):boolean;
begin
if ((let>='a') and (let ='A') and (let<='Z')) then letter:=true
else letter:=false;
end;
begin
readln (s);
s:=s+' ';
n:=length(s);
flag:=false;
for i:=1 to n do
begin
if (letter(s[i])) and (not flag) then
begin
flag:=true;
tmp:='';
word:=false;
end else if (not letter(s[i])) and (flag) then
begin
flag:=false;
if (word) and (not (tmp='')) then writeln (tmp);
end;
if (flag) then
begin
tmp:=tmp+s[i];
if (s[i]='k') then word:=true;
end;
end;
end.

Информационным называют процесс, связанный с определёнными операциями (действиями) над информацией, в ходе которых может измениться содержание информации или её форма.
Виды информационных процессов
Среди всех информационных процессов можно выделить наиболее общие.

К ним относятся:

- получение,

- передача,

- хранение

- обработка информации.

Эти процессы являются базовыми.

Их выполнение порождает другие информационные процессы.

Так, например,

- получение информации может быть связано с её поиском, хранение — с накоплением;

- при передаче информации необходимо позаботиться о её защите от разрущающих воздействий.
Все процессы требуют той или иной формы представления информации, определяет которую процесс — кодирование. Он сопровождает все остальные процессы и является связующим звеном между ними.
Информационные процессы не изолированы, а протекают циклично в единстве и взаимосвязи друг с другом.

Решение представлено во вложениях.

Язык: Pascal

Пояснение:

1 шаг основного цикла:

i = 1; j = 1; На экран выводится '1'; s = 0 + 2 = 2;i = 1; j = 2; На экран выводится '1'; s = 2 + 2 = 4;

2 шаг основного цикла:

i = 2; j = 1; На экран выводится '1'; s = 4 + 2 = 6;i = 2; j = 2; На экран выводится '1'; s = 6 + 2 =8;

3 шаг основного цикла:

i = 3; j = 1; На экран выводится '1'; s = 8 + 2 = 10;i = 3; j = 2; На экран выводится '1'; s = 10 + 2 = 12;

4 шаг основного цикла:

i = 4; j = 1; На экран выводится '1'; s = 12 + 2 = 14;i = 4; j = 2; На экран выводится '1'; s = 14 + 2 = 16;

5 шаг основного цикла:

i = 5; j = 1; На экран выводится '1'; s = 16 + 2 = 18;i = 5; j = 2; На экран выводится '1'; s = 18 + 2 =20;

В результате работы программы на экран будет выведено:

111111111120