Предмет: Информатика,
автор: Garmor
Даны натуральные числа х и у.Вывести в Label1 целую часть числа х/у, а в Ladel2 8 цифр после запятой числа х/у.
Ответы
Автор ответа:
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
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
Автор ответа:
0
Так или нужно именно эти "8" цифр?
Автор ответа:
0
Да , нужно именно 8 цифр после запятой .
Похожие вопросы
Предмет: Английский язык,
автор: aleksandrmandryka93
Предмет: Алгебра,
автор: ssevda2005
Предмет: История,
автор: demannazarov60
Предмет: Математика,
автор: 228555321
Предмет: Математика,
автор: Аноним