Дана последовательность операторов: c:=1; d:=2; repeat c:=c*2; d:=d+2; until d<9 s:=c+d end. Сколько будет раз повторён цикл и какими будут значения переменных c. d. s. Слово ответ писать обязательно

Попробуй Program PascalGuru; var s:string;    f,t:text;
function preobr(s:string):string;var i,j,p,n,sered:integer;    gl,zp,slovo:string;    m:array [1..80] of string;beginzp:='!?*,.'; gl:='аоуыэяеёюи';  p:=pos(' ',s); i:=0;        repeat        inc(i);        slovo:=copy(s,1,p-1);        m[i]:=slovo;        delete(s,1,p);        p:=pos(' ',s);        until p=0;        n:=i+1;        m[n]:=s;    for i:=1 to n do     begin    s:=m[i];       if pos(s[length(s)],zp)<>0 then p:=length(s)-1 else p:=length(s);     sered:=(p div 2)+1;    if (not odd(p)) or (p<3) then continue;     if pos(s[1],gl)=0       then continue;     if pos(s[sered],gl)=0   then continue;     if pos(s[p],gl)=0       then continue;      s[1]:=UpCase(s[1]);    s[sered]:=UpCase(s[sered]);    s[p]:=UpCase(s[p]);     m[i]:=s+'('+s[1]+','+s[sered]+','+s[p]+')';     end;         s:='';     for i:=1 to n do s:=s+m[i]+' '; preobr:=s;end;
 beginassign(f,'input.txt'); reset(f);assign(t,'output.txt'); rewrite(t); while not eof(f) do      begin      readln(f,s);      writeln(t, preobr(s) );      end;  writeln('Файл успешно записан...'); close(f);close(t);readln;end.

Информатика и есть компьютерная наука, а hardware связано с информатикой тем, что например ввод информации либо вывод информации.

информация это знание которое мы получаем при общении, зрении, слышании.

сведения это тоже одно из знаний которое мы получаем при чтении например.

software связанно и с информатикой и со знанием, программное обеспечение, это возможности для вашего компьютера например windows 10- это программное обеспечение которое компьютеру работать лучше и в видео играх оно даёт прирост к фпс.