4 МБит/c = 4 * 1024 = 4096 КБит/с
4096 КБит/с = 4096 / 8 = 512 КБайт/c
3072 / 512 = 6 секунд
Модель- это упрощенный заменитель реального объекта. :3
Текстовую, звуковую, <span>видеоинформацию </span>, графическую.
Program n1;
var a: integer;
begin
readln(a);
case a of
1..89: writeln('Остроугольный');
90: writeln('Прямоугольный');
91..179: writeln('Тупоугольный');
else writeln('некорректный ввод');
end;
end.
uses WinCrt;
var
a, s: real;
begin
write('Введите сторону квадрата: ');
readln(a);
s:=a*a;
writeln('Площадь квадрата: ',s:5:2);
<span>end.</span>