//Язык Pascal
Program Test;
Var str: string;
Begin
Write('Введите строку: ');
Readln(str);
str[2] := 'Ж';
str[length(str) - 1] := 'Ж';
Writeln();
Writeln('Строка после обработки: ', str);
End.
var
n : integer;
S : decimal;
function fac(n : integer) : decimal;
begin
result := 1;
for var i := 1 to n do result := result * i;
end;
begin
write('введите n = ');
readln(n);
for var i := 1 to n do S := S+fac(i);
writeln('S=', S);
end.
Попробуй 150 240
Я не совсем уверена правда
Количество символов = 10*35*79 = 27650
8 бит = 1 байт
Объем реферата = 27650*1 байт = 27650 байт
Речь идет об Эйфелевой башне в Париже. Башня построена в 1889 г. к Всемирной выставке. Главный конструктор (Гюстав Эйфель) называл её <span>«300-метровой башней».</span>