Составьте программу получения частного двух целых чисел с большой точностью

@Dasha22 · Регистрация: 06.04.2013

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

Составьте программу получения частного двух целых чисел с большой точностью (N знаков после запятой, N>100)

@Puporev · 06.04.2013, 19:16

Pascal

uses crt;
var a,b,c,i,n:integer;
    s:string;
begin
clrscr;
writeln('Введите 2 целых числа');
readln(a,b);
repeat
write('Количество знаков после запятой n>100 n=');
readln(n);
until n>100;
write(a div b,',');
c:=a mod b;
for i:=1 to n do
 begin
  c:=c*10;
  write(c div b);
  c:=c mod b;
 end;
readln
end.

@Dasha22 0 / 0 / 0 Регистрация: 06.04.2013 Сообщений: 26
		1
	Составьте программу получения частного двух целых чисел с большой точностью 06.04.2013, 18:14. Показов 4027. Ответов 1 Метки нет (Все метки) Составьте программу получения частного двух целых чисел с большой точностью (N знаков после запятой, N>100) 0

	06.04.2013, 19:16

Составьте программу получения частного двух целых чисел с большой точностью

Решение