Составить программу нахождения произведения чисел:
1/2, 2/3 ... 9/10  
Язык: Pascal

Ваша программа дает неверный ответ 7.07103174603175. Вы хотя бы подумали, как может произведение дробей, каждая из которых меньше единицы, дать семь целых? или Вы пишете программы, но не проверяете их работу?

ой, я сумму вывел

Я заметил))))

Можешь поставить нарушение? Просто кнопки изменить нету

Я не ставлю нарушений команде модераторов, спамаутам и Знатокам. Но если просите, могу.

varchisl, znam, multi: real;beginmulti := 1;chisl := 1;znam := 2;for var k := 1 to 9 dobeginmulti *= chisl / znam;chisl += 1;znam += 1;end;write(multi);end.