program test;
var number: integer;
begin
write('Enter the number: ');
readln(number);
if (number mod 2 = 0) then
writeln('Chislo ', number, ' chetnoe')
else
writeln('Chislo ', number, ' nechetnoe');
readln();
end.
<span>Диск представляет из себя одну большую папку (корневой каталог), в которой можно создавать другие папки для хранения файлов. Файл можно создать, редактировать (как содержимое файла, так и название, т.е., переименовать), переместить в другую папку, скопировать\вставить, удалить</span>
Инф.объем = частота * время * разрядность * кол-во дорожек
1 мин = 60 сек
Дорожка 1 (т.к. В условии не сказано что их несколько)
1,3 мб = 1,3*1024*1024*8 бит
1,3*1024*1024*8 = частота * 60 * 8 * 1
1,3*1024*256 = частота * 15
Частота =1,3*1024*256 / 15
Осталось посчитать
Нц пока снизу свободно
вниз
кц
нц пока снизу не свободно
вправо
кц
вниз
вниз
влево
нц пока сверху не свободно
сажать цветы
влево
кц