Pascal, цикл while или repeat 1+1/2!+1/4!+1/6!+ …

Вопрос от пользователя: Пуся

Pascal, цикл while или repeat

1+1/2!+1/4!+1/6!+ …

Ответ: Митюха

Var

i, n:integer;

p, s:real;

begin

Write (‘n=’); Read (n);

s:=1;

i:=1;

p:=1;

while i

Беликова Ирина

Учитель физики, информатики и вычислительной техники. Победитель конкурса лучших учителей Российской Федерации в рамках Приоритетного Национального Проекта "Образование".

Оцените автора
Добавить комментарий