Паскаль: «Введите с клавиатуры число x. Определите, является ли данное число дробным.
5-9 класс
|
Пример ввода: 3.5
Пример вывода: Число дробное»
Program z1;
var a,c:real;
begin
readln(a);
c:=round(a);
if c=a then writeln('число не дробное')
else writeln('Число дробное');
end.
Другие вопросы из категории
Дано целое число, больше 99. Найти третью от конца его цифру, последнюю цифру и разность квадратов этих цифр (использовать функции DIV и MOD).
пжлст напишите на паскале
а. файловый сервер
б. рабочая станция
в. клиент сервер
г. коммутатор
Читайте также
№20. Даны величины углов треугольника. Определить является ли это треугольник:
а) остроугольным
б) тупоугольным
в) прямоугольным
г) равносторонним
д) равнобедренным.
№21. Определить, какая из двух точек - M1(x1,y1) или M2(x2,y2) - расположена ближе к началу координат. Вывести на экран дисплея координаты этой точки.
№22. Даны действительные числа a, b, c, x, y. Выяснить, пройдет ли кирпич с ребрами a,b,c в прямоугольное отверстие со сторонами x и y. Просовывать кирпич в отверстие разрешается только так, чтобы каждое из его ребер было параллельно или перпендикулярно каждой из сторон отверстия.
№23. Написать программу, которая печатает True или False в зависимости от того, выполняются или нет заданные условия:
а) квадрат заданного трехзначного числа равен кубу суммы цифр этого числа;
б) сумма двух первых цифр заданного четырехзначного числа равна сумме двух его последних цифр;
в) среди цифр заданного трехзначного числа есть одинаковые;
г) среди первых трех цифр из дробной части заданного положительного вещественного числа есть цифра 0.
Составить программу, определяющую, является ли данное утверждение истинным:Ровно одно из чисел А и В не превышает 100
1) найти и вывести сумму его цифр
2) сформировать число, в котором поменяются разряды (допустим будет число 13, нужно сделать, что бы было 31 и т.п.)
II В паскале с помощью генератора случайных чисел получить трехзначное число и определить, является ли оно полимером (например 121 - является, 123 - нет)
1) найти и вывести сумму его цифр
2) сформировать число, в котором поменяются разряды (допустим будет число 13, нужно сделать, что бы было 31 и т.п.)
II В паскале с помощью генератора случайных чисел получить трехзначное число и определить, является ли оно полимером (например 121 - является, 123 - нет)
пример ввода 3.5
пример вывода
число дробное