Нахождение частного от деления Pascal(Паскаль)

Программа вводит два целых числа и выводит частное от деления 1-го на 2-е

Program Input_Output; 
var 
n1,n2 : integer;  {n1 и n2 — вводимые целые} 
x:real; {х -результат} 
begin 
Write('n1='); {Сообщаем с вводе n1}
ReadLn(n1); {Вводим n1} 
Write('n2 ='); {Сообщаем с вводе n2} 
Readln(n2);  {Вводим п2}
x:= n1/n2;  
Writeln(n1/n2);
end. 

Leave a Comment

7 + 2 =