Побольше обьяснений, а пока напишу так:
var A:integer;
begin
Writeln('Введите температуру, в зимнее время');
Readln(A);
If A>0 then
Writeln('Метеорологическая весна наступала')
else
Writeln('Метеорологическая весна не наступала');
end.
512 Кбит = 512 000 бит = 512 000 / 8 = 64 000 байт =
64 000 / 1024 = 62.5 Кбайт.
За 5 с можно передать 62.5×5 = 312.5 Кбайт
Комментарий. Некоторые учебники неверно трактуют килобиты и считают, что 1 кбит - 1024 бит. На самом деле бит - системная единица в Си и для неё действуют обычные кратности 10³. А килобайт - единица внесистемная, с кратностью 2¹⁰
ОЗУ,Оперативная память,<span>часть</span> памяти, в которой во время работы компьютера хранится код программы
<em>// PascalABC.NET 3.3, сборка 1633 от 10.02.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var x:=ReadReal('x=');
var y:=x<0 ? (3*x*x+4)/6 : Sqrt(3*x-2);
Writeln('y=',y)
end.
<u>Примеры</u>
x= 12.4
y=5.93295878967653
x= -5.01
y=13.2167166666667