Здесь легко и интересно общаться. Присоединяйся!
функция frac() берет от вещественного числа дробную часть .
var z,x:real;
begin
writeln(‘Vvedite X:’);
readln(x);
z:=frac(x);
if z=0 then
writeln(‘Целое’)
else
writeln(‘Не Целое’);
end.
Pascal (Паскаль). Типы данных. Целые и вещественные числа.
Pascal (Паскаль). Типы данных. Целые и вещественные числа.
Типы данных в языках программирования определяют какое значение может принимать, в общем случае, переменная. Паскаль характерен строгой типизацией. Это означает: что переменная одного типа не может принимать значение другого типа. Такой подход к проектированию разработки прививает к правильному (системному мышлению) в программировании. С другой стороны, вы как программист, можете быть уверены, что какая-то переменная, на каком-то участке проекта, не поменяет свой тип данных.
Рассмотрим целые и вещественные числа. Программисты применяют переменные этих типов достаточно широко в программировании (в нашем случае в Паскале).
Группа целых чисел
| Название типа | Идентификатор | Длина (байт) | Диапазон значений |
| Короткое целое со знаком | shortint | 1 | -128..127 |
| Целое со знаком | integer | 2 | -32768..32767 |
| Длинное целое со знаком | longint | 4 | -2147483648..2147483647 |
| Короткое целое без знака | byte | 1 | 0..255 |
| Целое без знака | word | 2 | 0..65535 |
Группа вещественных чисел
| Название типа | Идентификатор | Длина (байт) | Диапазон значений |
| Вещественное одинарной точности | single | 4 | 1,5×10 -45 … 3,4×10 38 |
| Вещественное | real | 6 | 2,9×10 -39 … 1,7×10 38 |
| Вещественное с двойной точностью | double | 8 | 5×10 -324 … 1,7×10 308 |
| Вещественное с повышенной точностью | extended | 10 | 3,4×10 -4932 .. 1,1×10 4932 |
| Целое в формате вещественного | comp | 8 | -9,2×10 18 … 9,2×10 18 |
Типы данных целые и вещественные числа в Паскале (Pascal).
Условие задачи : Определить делиться ли нацело число с помощью конструкции if then else (Язык Pascal)
Сложность : легкая .
Решение задачи Pascal :
Для начала продумаем решение. Первым делом попросим пользователя ввести число которое он хочет делить и число на которое он хочет делить. Дальше будем использовать условие. В котором будем применять операцию mod, которая находит остаток от деления.
Для того чтобы определить делиться ли нацело число , нам понадобиться одна переменная под число которое мы будем проверять, переменная под число на которое будем делить и конструкция if then else.
Начнем мы с каркаса нашей программы .
Здесь мы дали нашей программе название, объявили наши переменные , присвоили им целочисленный тип .
Дальше нам надо попросить у пользователя ввести числа.
Теперь у нас есть числа с которыми можно работать . Нам нужно проверить делиться ли оно нацело . Вот здесь нам и поможет конструкция if then else .
Тут мы пишем : если(if) остаток от деления(mod) равен 0 , то мы выводим что число делиться нацело на то число которое мы ввели .
Иначе (else) мы выводим что число не делиться нацело на то число которое мы ввели .
