Форум программистов, компьютерный форум CyberForum.ru
CyberForum.ru - форум программистов и сисадминов > > >
Восстановить пароль Регистрация
 
Encoded
Гость
Сообщений: n/a
13.10.2011, 21:25     Вывести дробную и целую части вещественного числа #1
Учитель с Информатики дал задачу.
Дано действительное число p. В первой строке вывести его закругленное целое значение, во втором - его целую часть, в третьем - его дробную часть (один знак после запятой).
Входные данные.
3.5
Исходные данные.
4
3
0.5

Очень хочу ее решить но не получается.

Только начинаю учить этот язык...
Лучшие ответы (1)
AdAgent
Объявления
13.10.2011, 21:25     Вывести дробную и целую части вещественного числа
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.10.2011, 21:25     Вывести дробную и целую части вещественного числа
Посмотрите здесь:

Pascal ABC Введите дробное число. Вывидите отдельно дробную и целую часть
Pascal ABC Выделить дробную часть неотрицательного числа
Дана строка. Если она представляет собой запись целого числа, то вывести 1, если вещественного (с дробной частью) — вывести 2 Pascal ABC
Pascal ABC Найти произведение первой цифры целой части и третьей цифры дробной части вещественного числа
Вывести абсолютное значение заданного вещественного числа А Pascal ABC
Вывести целую часть заданного положительного вещественного числа А Pascal ABC
присвоить целой переменной d первую цифру из дробной части положительного вещественного числа х Pascal ABC
Вывести первую цифру дробной части числа Pascal ABC


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
log(n)
Форумчанин
106 / 106 / 10
Регистрация: 13.10.2011
Сообщений: 228
13.10.2011, 23:50     Вывести дробную и целую части вещественного числа #2
Сообщение было отмечено автором темы, экспертом или модератором как ответ
Код Pascal
1
2
3
4
5
6
7
8
9
10
11
var
  p: real;
 
begin
  p := round(3.5);
  Writeln(p);
  p := trunc(3.5);
  Writeln(p);
  p := frac(3.5);
  Writeln(p);
end.
либо так :

Код Pascal
1
2
3
4
5
6
7
8
9
10
var
  p,p1,p2,p3: real;
 
begin
  p:=3.5;
  p1 := round(p);
  p2 := trunc(p);
  p3 := frac(p);
  writeln('Округленное число: ',p1, ' Целая часть числа: ' ,p2 ,' Дробная часть числа: ' ,p3);
end.
Encoded
Гость
Сообщений: n/a
14.10.2011, 08:24     Вывести дробную и целую части вещественного числа #3
Спасибо огромное.
Yandex
Объявления
14.10.2011, 08:24     Вывести дробную и целую части вещественного числа
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Задать вопрос
Опции темы

Текущее время: 04:49. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.7 PL3
Copyright ©2000 - 2015, vBulletin Solutions, Inc.
Яндекс.Метрика