| 
           
 Задача 3. 
Расчет скорости тела при падении с башни  
Program Piza;  
   const    { Это раздел описания констант. Он находится перед разделом var } 
         G=9.8;  { Тип константы определяется автоматически, по форме записи числа. В данном случае из-за наличия десятичной точки это тип real } 
   var 
       V,H:  real;  
begin 
   write('Введите высоту башни:'); 
   readln(H);  
   V:=Sqrt(2*G*H); 
   writeln('Скорость падения',V:6:3): 
{ Чтобы текст и число не "слиплись", после текста внутри апострофов добавлен пробел } 
   readln  
end. 
	
  
       |