Не является частью никакой информационной системы.а) программное обеспечениеб) данныес) провайдерд) аппаратное обеспечение​

С -провайдер

Попробуй 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.

Задание №7

Знак « : = » называется «присвоить». Если простыми словами, то это переводится как «равно»

а) c : = a + 1/3

Это значит: с равно а + 1/3

Вместо а нужно поставить значение, которое нам дано в условии задания.

Если подставить а, то получится:

с : = а + 1/3

с : = 2 + 1/3

с : = 2 целых 1/3 (это и есть ответ)

Во всех остальных примерах этого задания надо делать тоже самое. Вместо а подставлять 2, а вместо b ставить 3, потом всё решать как обычный пример по математике

Задание №8

В этом задании есть такие знаки:

: = - присвоить (или равно)

div - разделить (если при делении будет остаток, его писать не надо. Выписывается только целое число)

mod - разделить и написать остаток (например, если написано: 9 mod 4. Нужно 9 разделить на 4 и написать число, которое осталось. Девять без остатка разделить нельзя, значит, берём ближайшее делимое число, которое меньше девяти - это 8. Потом из девяти вычитаем восемь и получаем один. 1 и надо выписать. То есть, 9 mod 4 = 1 )

а) с : = а mod b + b

c : = 26 mod 6 + 6

c : = 2 + 6

c : = 8

Сначала посчитать 26 mod 6 (получится 2), а потом прибавить 6

б) c : = a div b + a

с : = 24 div 6 + 26

c : = 4 + 26

с : = 30

Сначала посчитать 24 div 6 (24 разделить на 6 и выписать целое число. То есть 4)

в)

b : = a div b

c : = a div b

В данном примере несколько строк. Считаем первую:

b : = a div b

b : = 26 div 6

b : = 4

Теперь, чтобы посчитать вторую строку задачи, вместо b надо ставить не 6, а 4, потому что в первой строке мы посчитали и присвоили b : = 4. Всегда так надо делать. (Например, если в начале задачи написано, что х : = 1, то в самый первый раз так и надо считать. Но если потом в каком-то примере х станет 3, то теперь это и будет новое значение, с которым надо работать. Запомни правило: какое значение последнее, то и использовать.

Весь пример этой задачи будет выглядеть так:

b : = a div b

c : = a div b

b : = a div b

b : = 26 div 6

b : = 4

с : = a div b

c : = 26 div 4 (взять последнее значение b, то есть 4)

c : = 6 (это ответ)

Остальные примеры решаются также