Дано трехзначное число; найти в нем число тысяч, десятков и единиц

@Рита89 · Регистрация: 22.09.2019

Author24 — интернет-сервис помощи студентам

нужно сделать так, как на втором скриншоте. Чтобы вычислялось. Задача: Дано трехзначное число. Найти в нем число тысяч, десятков и единиц.

Как сделать так, чтобы при нажатии на "Вычислить"(число написать в строке "Вписать число"), числа появлялись в строчках"Число тысяч", "Число десятков", "Число единиц"?
Выделенная строчка, как я понимаю, не правильная. Подскажите, что делать...

@DmiMukh · 25.09.2019, 10:31

У вас "Edit" - это объекты. Вам надо присваивать значения их свойствам. Предварительно преобразовав к нужному типу данных.

@Puporev · 25.09.2019, 10:46

В трехзначном числе нет тысяч. Может нужно число сотен?

@Puporev · 25.09.2019, 10:52

Pascal

procedure TForm1.Button1Click(Sender: TObject);
var n,s,d,e:integer;
begin
val(Edit1.text,n,e);//число нужно ввести до нажатия кнопки
if(e<>0)or(n<100)or(n>999) then
 begin
   ShowMessage('Введите целое число от 100 до 999');
   Edit1.Clear;
   Edit1.SetFocus;
   exit;
 end;
s:=n div 100;
d:=n div 10 mod 10;
e:=n mod 10;
Edit2.text:=inttostr(s);
Edit3.text:=inttostr(d);
Edit4.text:=inttostr(e);
end;

@Рита89 0 / 0 / 0 Регистрация: 22.09.2019 Сообщений: 18
		1
	Дано трехзначное число; найти в нем число тысяч, десятков и единиц 25.09.2019, 07:30. Показов 3768. Ответов 3 Метки нет (Все метки) нужно сделать так, как на втором скриншоте. Чтобы вычислялось. Задача: Дано трехзначное число. Найти в нем число тысяч, десятков и единиц. Как сделать так, чтобы при нажатии на "Вычислить"(число написать в строке "Вписать число"), числа появлялись в строчках"Число тысяч", "Число десятков", "Число единиц"? Выделенная строчка, как я понимаю, не правильная. Подскажите, что делать... Миниатюры 0

@DmiMukh 34 / 33 / 21 Регистрация: 14.11.2016 Сообщений: 141
	25.09.2019, 10:31	2
	У вас "Edit" - это объекты. Вам надо присваивать значения их свойствам. Предварительно преобразовав к нужному типу данных. 0

@Puporev Почетный модератор 64304 / 47599 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	25.09.2019, 10:46	3
	В трехзначном числе нет тысяч. Может нужно число сотен? 0

	25.09.2019, 10:52

Опции темы