D
x=16 и y=2
<span>Ввод: х=16 y=2
</span>x=x16=4<span>y=y2=4
</span><span>x=4+1=5
</span><span>y=4+5=9
</span><span>Вывод: y=9</span>
Ответ:
K(кол-во символов в сообщении) = 3*40*60 = 7200
N(мощность алфавита) = 64 = 2^6
i общ = 7200*6=43200бит=5400байт.
ответ: 5400
<span>var
f: text;
s: string;
max: string := '';
begin
//в папке с программой должен быть файл "input.txt"
if FileExists('input.txt') then
begin
Assign(f, 'input.txt');
Reset(f);
while not Eof(f) do
begin
Readln(f, s);
if Length(s) > Length(max) then
max := s;
end;
Writeln('Самая длинная строка в файле: ');
Writeln(max);
Close(f);
end
else
Writeln('Файл не найден');
end.</span>
Program pr;
uses crt;
Var a, b, c, y:real;
Begin
Writeln('Введите a, b, c');
readln(a, b, c);
y:=exp(3*ln(b))+sqrt(c)-sqrt(a);
Writeln('y=', y);
readln;
end.
Объяснение:
^ не ставится, но действие выполняется, у себя его ставьте!