Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов > Программирование под Windows > Delphi
Перезагрузить страницу Присвоить целой переменной k первую цифру из дробной части
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
Student777 Student777 вне форума
Новичок
 
Сообщений: 2
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 02.07.2017
Angry Присвоить целой переменной k первую цифру из дробной части - 02.07.2017, 22:57

Присвоить целой переменной k первую цифру из дробной части положительного вещественного числа. в программе Delfi


procedure TForm1.Button1Click(Sender: TObject);
var
x:byte;
k:real;
begin
write('Введите вещественное число с дробной частью');
readln(k);
k:=trunc(x*10) mod 10;
write('первая цифра дробной части=',);
end;

end.

подскажите что не так делаю. при вводе дробного числа в программе при нажатии на кнопку вычислить выдаёт ошибку.
Миниатюры
ioeaea.jpg  
Ответить с цитированием
  (#2 (permalink)) Старый
Student777 Student777 вне форума
Новичок
 
Сообщений: 2
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 02.07.2017
По умолчанию 02.07.2017, 23:08

вот так выглядит сама программа
Миниатюры
idhiadhaiia.jpg  
Ответить с цитированием
Ads
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
аналог в цифру фаза Видео 1 20.01.2012 23:37
Присвоить переменной F значение 1 swatsam Вопросы начинающих программистов 14 07.01.2011 23:46
Присвоить целой переменной h третью от конца цифру в записи целого положительного числа k imported_Andrey01 Visual C++ 11 12.03.2010 11:21
Возвращение целой части от деления числа А на число В Serega_Mexanik Delphi 5 14.07.2008 16:05
Как получить системное время и присвоить его переменной типа AnsiString demonphp C++ Builder 7 04.05.2007 11:56
Как найти любую цифру или символ --Jeck-- C++ Builder 3 18.09.2006 14:34
Как присвоить перечислимой переменной число Bogdan1024 С/С++ 7 11.05.2006 12:56
Программа с изменением символа на цифру toshkaexe Вопросы начинающих программистов 5 25.11.2005 13:34
Как присвоить переменной S значение 0 Lakomka Вопросы начинающих программистов 36 18.10.2005 14:54
Требуется присвоить значение из TEdit переменной типа long SadoMazaXist C++ Builder 11 18.03.2005 01:47
Написание программы перевода действительных чисел с конечной дробной частью SeGMent Вопросы начинающих программистов 1 05.05.2004 19:28
Как присвоить переменной содержимое поля ComboBox.text Anonymous Delphi 1 14.10.2003 20:16



Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Нardforum.ru - компьютерный форум и программирование, форум программистов