Question

Дан размер файла в байтах. Используя операцию деления нацело, найти количество полных килобайтов, которые занимает данный файл

(1 килобайт = 1024 байта).

Answer 1

Ответ:

var b:integer;

begin

write('Введите размер файла в байтах ');

readln(b);

writeln ('Количество полных килобайт ',b div 1024)

end.

Объяснение:

div - операция целочисленного деления