Паскаль ,задача для робота !

Question

Ребята помогите пожалуйста написать программу .Я ничерта не понимаю ,бодные дети как это вообще можно понять ))))Дан размер диогонали манитора в дюймах .Перевести данное значение в см .Это одна задача ,2: дан размер файла в байтах .найти количество полных килобайтов ,которые занимает данный файл .Все для паскаля

andrei_vk_24 · Accepted Answer

program MonitorDiagonalConversion; 
uses 
  crt; 
var 
  diagonalInInches: integer; 
  diagonalInCentimeters: real; 
begin 
  clrscr; 
   
  writeln('Введите размер диагонали монитора в дюймах:'); 
  readln(diagonalInInches); 
   
  diagonalInCentimeters := diagonalInInches * 2.54; 
   
  writeln(diagonalInInches, ' дюйма = ', diagonalInCentimeters:0:2, ' сантиметра'); 
   
  readln; 
end.

jurijus_zaksas · Answer

Килобайты:
 var b : integer;&#10;begin&#10;  Readln(b);&#10;  Writeln(b shr 10);&#10;end;

infrared_13 · Answer

каждый москаль программируе на паскаль