1 килобайт=1000 байт
Значит 10 килобайт=10000 байт
Var s:real;
begin
write('s='); readln(s);
if s>1000 then s:=s-0.01*s;
writeln('S=',s);
end.
Пример:
s=1200
S=1020
Блок-схема - в прилагаемом файле
Для первого сообщения 1 символ=4 бита. (2 в 4 степени=16) и умножаем 4 * 40 = 160 бит.
для второго сообщения 1 символ=6 бит. (2 в 6 степени = 64) и умножаем
6 * 15 = 90 бит.
3D от англ 3-dimentional (Трехмерный). 3D Модель - изображение какого-либо объекта в 3-х мерном пространстве, то есть у которого есть 3 измерения: длина, ширина, высота. 3D моделью можно считать любой предмет окружающего мира, так как у всех окружающих нас предметов есть длина, ширина и высота.