<span>program test;
var
i, n: word;
begin
write('Введите число: ');
readln(n);
for i := 1 to n do begin
write(i, ' ')
end;
<span>end.
Блок-схему прикрепил</span></span>
Файловая система это иерархическая структура. Следовательно, есть папки верхнего и нижнего уровня. Например Рабочий стол/Папка1/Папка2
Здесь видно что Папка2 лежит в Папке1 значит Папка2 нижняя, а Папка 1 верхняя, в свою очередь Рабочий стол по отношению к Папке1 верхняя папка, а Папка1 нижняя. Если все равно остались вопросы пишите в личку
Лови ответ, я проверил, всё правильно:
var a: real;
begin
write('введите длину стороны куба: ');
readln(a);
writeln('диагональ: ',a*sqrt(3));
writeln('объем: ',a*a*a);
write('площадь поверхности: ',6*a*a);
end.
(I - информационный объем текста, K - кол-во символов, i - вес одного символа/бит на символ)
Дано:
K = 6 * 30 * 70 = 12600 шт
Пусть i = 8 бит (Кодировка ASCII)
I - ?
Решение:
I = K * i = 12600 * 8 бит = 100800.0 бит
100800.0 бит = 12600.0 байт