Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Сравнение вещественных чисел

Автор: Emptiness 22.05.2011 15:40

Бьена Джёрната! Нужно написать программу которая будет сравнивать массив вещественных чисел с эталоном(который вводится с клавиатуры) с задаваемой точностью(которая также вводится с клавиатуры).

Цитата
const N=30;
var
a:array[1..N] of real;
x:real;
z,i:integer;
Begin
readln(x);
for i:=1 to N do
Begin
readln(a[i]);
if a[i]=x then
z:=z+1
end;
write(z);
end.

Подскажите алгоритм, который сможет сравнить числа с точностью которую задаст юзер.

Автор: -TarasBer- 22.05.2011 16:18

if abs(x-y)<eps then...

Автор: Emptiness 22.05.2011 17:35

thx