n = float(input('С какой скоростью шли богатыри? '))
r = float(input('Какое расстояние им предстоит преодолеть? '))
print('Время в пути (в минутах): ' + str(r/n))
Ну незнаю в моем компютере восемь
64 символа => 2^6=64 => 6 бит/символ 7200 байт = 7200*8 = 57600 бит 57600/6=9600 символов в сообщении 9600/4/40=60 символов в строке.
var x,z:real;
begin
writeln('Вычислить значение выражения по формуле y= (1+sin(SQRT(x+1)))/(cos(12*z-4))');
write('Введите число X: '); readln(x);
write('Введите число Z: '); readln(z);
writeln('y= ',(1+sin(sqrt(x+1)))/(cos(12*z-4)):0:2);
end.
Var s,s1:string; p:byte;
<span>begin readln(s); for p:=length(s) downto 1 do s1:=s1+s[p]; </span>
<span>writeln(s1); end.</span>