Дано: |Решение:N=64 символа |V=K*b; K=20 символов |N=2^b;_______________|64=2^b;V-? b=6 бит V=20*6 бит=120 бит= 15 байт.
Ответ: V=15 байт.
Uses crt;
var x, y:real;
begin
write('x='); read(x);
y:=2*sin(x)+0.5;
write('y=',y);
end.<span>
</span>
Надеюсь, это поможет. Первые две задачи написаны слева, третья - справа.
Var
Date: string;
year:integer;
begin
readln(Date);
Delete(Date, 1, Pos('.', Date));
Delete(Date, 1, Pos('.', Date));
year:=StrToInt(Date);
writeln(2015-year);
end.
6, потому-что она кроме как на себя и на 1 делится ещё на 3 и на 2, а остальные числа делятся только на себя и на 1 (такие числа называются простыми)