Даны натуральные числа M и N

@Жанна1 · Регистрация: 04.06.2015

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

Даны натуральные числа M и N. Вывести старшую цифру дробной части и младшую цифру целой части числа M/N.

@Farrewa · 07.06.2015, 22:09

То есть:
m = 12
n = 38
12/38
на экран выводим: 8 и 1
Так?

@Progulschic · 08.06.2015, 02:40

Может быть так: m=38 , n=12
38/12
на экран: 2 и 3
?

@northener · 08.06.2015, 02:46

Сообщение от Farrewa

Так?

Сообщение от Progulschic

Может быть так

Оба ответа мимо.

@Puporev · 08.06.2015, 06:48

Delphi

procedure TForm1.Button1Click(Sender: TObject);
var m,n,c,d:integer;
begin
m:=strtoint(Edit1.Text);
n:=strtoint(Edit2.Text);
c:=trunc(m/n)mod 10;
d:=trunc(10*frac(m/n));
Label1.Caption:='Старшая цифра дробной части='+inttostr(d)+#13#10+
                'Младшая цифра целой части='+inttostr(c);
end;

@Жанна1 · 08.06.2015, 09:15 **[ТС]**

огромное спасибо

@Жанна1 0 / 0 / 0 Регистрация: 04.06.2015 Сообщений: 29
		1
	Даны натуральные числа M и N 07.06.2015, 21:36. Показов 1365. Ответов 5 Метки нет (Все метки) Даны натуральные числа M и N. Вывести старшую цифру дробной части и младшую цифру целой части числа M/N. 0

@Farrewa 29 / 29 / 22 Регистрация: 27.12.2013 Сообщений: 368
	07.06.2015, 22:09	2
	То есть: m = 12 n = 38 12/38 на экран выводим: 8 и 1 Так? 0

@Progulschic 3 / 3 / 3 Регистрация: 06.09.2012 Сообщений: 45
	08.06.2015, 02:40	3
	Может быть так: m=38 , n=12 38/12 на экран: 2 и 3 ? 0

@northener пофигист широкого профиля 4733 / 3167 / 859 Регистрация: 15.07.2013 Сообщений: 18,252
	08.06.2015, 02:46	4
	Сообщение от Farrewa Так? Сообщение от Progulschic Может быть так Оба ответа мимо. 0

@Жанна1 0 / 0 / 0 Регистрация: 04.06.2015 Сообщений: 29
	08.06.2015, 09:15 [ТС]	6
	огромное спасибо 0

Даны натуральные числа M и N

Решение