помогите составить программу...

Тема в разделе "Информатика", создана пользователем PacaWaca, 14 янв 2010.

  1. PacaWaca

    PacaWaca New Member

    помогите составить программу в паскале нужно найти произведение чисел от 3 до 29 с шагом0,2
     
    PacaWaca, 14 янв 2010
    #1
  2. sakela

    sakela New Member

    Program z1;
    var i,S:real;
    Begin
    i:=3;
    S:=1;
    Repeat
    S:=S*i;
    i:=i+0.2
    Until i>29;
    writeln('произведение =',S);
    end.
     
    sakela, 14 янв 2010
    #2

Поделиться этой страницей

Наша группа