Даны натуральные числа х и у.Вывести в Label1 целую часть числа х/у, а в Ladel2 8 цифр...

0 голосов
56 просмотров

Даны натуральные числа х и у.Вывести в Label1 целую часть числа х/у, а в Ladel2 8 цифр после запятой числа х/у.


Информатика (44 баллов) | 56 просмотров
0

Совсем забыл , что надо именно на языке Паскаль .

Дан 1 ответ
0 голосов
Правильный ответ

Var
lable1, x, y:Integer;
lable2:real;
Begin
Readln(x, y);
lable1:= x div y;
lable2:= x/y - lable1;
Writeln(lable1);
Writeln(lable2:0:8);
end.

Пример:
10 3
3
0.33333333

(8.8k баллов)
0

Так или нужно именно эти "8" цифр?

0

Да , нужно именно 8 цифр после запятой .