Ответ: В)12*25, т.к. это довольно большое число что этой логарифмической линейки
// PascalABC.Net v.3.2, сборка 1325 (19.10.2016)
Var s:string;i:longint;
Begin
readln(s);
readln(i);
writeln(s[i]);
End.
Получится фраза: не спи, а учи
Первое задание левого варианта
var
x, y: real;
begin
readln(x);
if x > 0 then
y := sqrt(x + 1)
else y := 3 * x * x + 4 * x - 5;
writeln(y);
end.