Задание 1 Вычислите значения выражений на языке Python:
3
1) а b – 6,4 (b+8) + = Ь
4
2) d=a*b — 2abi (a + b)
3а - 2ab+b?
2a(3а - b)
4) tx - 4xy(x+y?)
5) h=ju + 1,7* (2 + 3)
3) 4 =
ретения​

ответ: =$D4*5.

Пояснение:

заметим, что буква адреса (D) оба раза одна и та же, что было невозможно без знака доллара: в противном случае получились бы различные буквы, отстоящие друг от друга на две буквы в алфавите

цифра — 4, и она в формуле без доллара. При копировании из E4 в C4 цифра не меняется (та же самая строка), при копировании в E5 значение увеличивается на единицу

Умножение на число 5 присутствует в обеих формулах, следовательно, оно есть и в оригинале (к слову, действия, не содержащие адресов ячеек, всюду копируются без каких-либо изменений).

Для подсчёта слов в предложении, вот код:

program Slova;
var
 s: string;
 r,i:integer;
begin
 writeln('Введите ваше предложение');
 readln(s);
 s:=s+' ';
 for i:=1 to length(s)-1 do
 if (s<>' ') and (s[i+1]=' ') then
 r:=r+1;
 writeln('В предложении ',r, ' слов. ');
 readln;
end.

Какая буква встречается чаще

Program Bykv;
Var s:String;
    i,k1,k2:byte;
Begin
    write('Введите строку: ');readln(s);
    For i:=2 to Length(s)-1 do
     if s[i]=s[1] then inc(k1)
      else if s[i]=s[Length(s)] then inc(k2);
    writeln('Первая буква встречается ',k1);
    writeln('Последняя буква встречается ',k2);
    writeln('Вывод:');
    if k1>k2 then writeln('Первая буква встречается чаще')
     else if k1<k2 then
     writeln('Последняя буква чаще')
      else writeln('Одинаково');
    readln;
End.

Изменить слово петя на иван в строке

program test;
var s,t,z,p:string;j:integer;
begin
writeln('Введите ваше предложение');
readln(s);
write('Введите слово которое хотите заменить: ');
readln(t);
write('Введите замену слову: ', t, ' <> ');
readln(z);
if pos(t,s)<>0 then
j:=pos(t,s);
p:=copy(s,1,j-1);
p:=p+z;
p:=p+copy(s,j+length(t),length(s));
writeln(p);
readln;
end.