Помогите написать программу в Delphi Pascal

[Денис2011]

Помогите написать программу в Delphi Pascal

Здравствуйте, помогите пожалуйста написать программу на Паскале.
1. С помощью оператора while. С клавиатуры вводятся числа и последовательно суммируются. Найти количество введенных чисел, когда их сумма превысила 100.
2. Вычислить и вывести на экран в виде таблицы значения функции, заданной с по¬мощью ряда Тейлора, на интервале от хнач до xкон с шагом dx с точностью е.

 

[Vladimir_S]

2. Вычислить и вывести на экран в виде таблицы значения функции, заданной с по¬мощью ряда Тейлора, на интервале от хнач до xкон с шагом dx с точностью е.

Задача уже была, листинг здесь:
http://www.tehnari.ru/f41/t70668/#post701704

 

[Денис2011]

Большое спасибо

 

[ww01031977]

1. С помощью оператора while. С клавиатуры вводятся числа и последовательно суммируются. Найти количество введенных чисел, когда их сумма превысила 100.

var s,i:real;
k:integer;
begin
while s<=100 do
begin
write('Vvedite chislo ');
readln(i);
s:=s+i;
k:=k+1;
end;
writeln('Summa= ',s:4:2);
writeln('Kolichestvo= ',k);
readln;
end.

 

[Gruvi]

В delphi еще надо ?