Задать вопрос
13 июля, 15:54

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

+5
Ответы (1)
  1. 13 июля, 17:08
    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
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Даны натуральные числа х и у. Вывести в Label1 целую часть числа х/у, а в Ladel2 8 цифр после запятой числа х/у. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Задача 1 - Дано целое число. Если оно положительное, вывести " Число положительное ", если отрицательное вывести "Число отрицательное ", если равно 0 - "Число равно нулю" задача 2 - дано целое число.
Ответы (1)
Паскаль. 1. вывести на экран все четные числа от 1 до n. 2. вывести на экран все трехзначные числа. 3. вывести на экран четырехзначные числа оканчивающийся на 7. 4. вывести на экран все трехзначные и двухзначные числа сумма цифр которых равна девяти.
Ответы (1)
Пробел ... 1) ставится перед запятой, двоеточием; 2) не ставится перед запятой, двоеточием; 3) ставится перед запятой, двоеточием и за запятой, двоеточием
Ответы (1)
1. for + random a. вывести случайное количество случайных чисел b. вывести на экран 10 случайных чисел c. вывести на экран 10 случайных чисел, значение которых лежит в отрезке [0,10] d.
Ответы (1)
Дано натуральное число: определить а) количество цифр в нем б) сумму его цифр в) произведение его цифр г) среднее арифметическое его цифр д) сумму квадратов его цифр е) сумму кубов его цифр ж) его первую цифру з) сумму его первой и последней цифр
Ответы (1)