Найти произведение двух первых цифр из дробной части положительного вещественного числа

@евгеха · Регистрация: 31.10.2010

Найти произведение двух первых цифр из дробной части положительного вещественного числа.

@~~pavelr~~ · 31.10.2010, 17:54

ch:=trunc(frac(n)*100);
c1:=ch div 10;c2:=ch mod 10;
p:=c1*c2;
write('P=',p);

@евгеха 1 / 1 / 0 Регистрация: 31.10.2010 Сообщений: 51
		1
	Найти произведение двух первых цифр из дробной части положительного вещественного числа 31.10.2010, 17:40. Показов 1415. Ответов 1 Метки нет (Все метки) Найти произведение двух первых цифр из дробной части положительного вещественного числа. 0

@~~pavelr~~ Заблокирован
	31.10.2010, 17:54	2
	ch:=trunc(frac(n)100); c1:=ch div 10;c2:=ch mod 10; p:=c1c2; write('P=',p); 1