Program z1;
var s,a,b:real;
begin
writeln('введите стороны прямоугольника');
readln(a,b);
s:=a*b;
writeln(s);
end.
Приставка кило - в информатике значит 1024
переводим 192Кбит/с в биты, получаем 196608бит/с
196608бит/с в байты (делим на 8) поучаем 24576байт/с
переводим 3600 Кбайт в байты, получаем 3686400байт
3686400байт делим на 24576байт/с получаем 150секунд. Всё понятно?
2*2-(1)
2*2-(1)=3
<span>3*3-(2)=7 </span>
<span>7*4-(3)=25 </span>
<span>25*5-(4)=121 </span>
<span>121*6-(5)=721 </span><span>
както так)))</span>
Var
x,y:real;
Begin
writeln('Введи значение аргумента х: ');
readln(x);
if x<-5 then y:=x;
if x>-5 and x<5 then y:=abs(x+2);
if x>5 then y:=cos(x);
writeln('значение функции в точке равно ',y);
readln;
End.