Question

Составить программу(срочно) Найти число X соответствующее целому от деления действительных чисел C и D

Answer 1

Program NoName;
Var x:integer;
c, d:real;
Begin
Write ('Введите числа c:=, d:=');
Read (c,d);
x:=c div d;
Write (x);
end.