Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
знаки той же арифметики, если эмоции- те же смайлики.
program e8;
var a, b, c, v: real;
begin
writeln('введите значения длины, ширины,высоты');
readln(a,b,c);
v: =a*b*c;
writeln('v=', v: 4: 2);
readln;
end.
надо.
10000 байт перевести в килобайты
10000 байт перевести в мегабайты (мг)
600000 байт перевести в кигобайт (кб)
решение
1 килобайт = 2^10 = 1024 байт > 1 байт=1/2^10 килобайт
1 мегабайт = 2^20 = 1048576 байт > 1 байт = 1/2^20 мегабайт
приставка киго не существует, по этому принимаю буквенное обозначение кб
тогда
10000 байт = 9,765625 килобайт
10000 байт = 0,00953674 мегабайт
600000 байт = 585,9375 килобайт
var a: array [1..16] of integer;
i,s,c,d: integer;
randomize;
read(c,d);
for i : = 1 to 16 do begin
a[i]: = random(d+c) - c;
if a[i]> 0 then s: = s + a[i];
end;
writeln(s);
Популярные вопросы