Прогресии

ZEDT · 13 Май 2018

Прогресии

Добрый вечер, помогите пожалуйста с решением данной задачки на ЯП (PASCAl)
Задачка:
Составить программу, вычисляющую сумму возрастающей арифметической прогрессии прямым суммированием слагаемых. Определить минимальное число слагаемых, нужных для переполнения слова. Программа не должна выдавать ошибку переполнения. С клавиатуры задается начальный член и шаг прогрессии

pofig13 · 13 Май 2018

это хорошо что вот это

ZEDT написал(а):
Составить программу, вычисляющую сумму возрастающей арифметической прогрессии прямым суммированием слагаемых. Определить минимальное число слагаемых, нужных для переполнения слова. Программа не должна выдавать ошибку переполнения. С клавиатуры задается начальный член и шаг прогрессии

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

Vladimir_S · 13 Май 2018

pofig13 написал(а):
это хорошо что вот это я трезвым прочитал , был бы датый .... дураком бы остался на всю жизнь

Да брось ты — элементарная школьная задачка. Единственная "изюминка" — обход переполнения. Но и это просто.
P.S. Да и лекция по основам органической химии сложна разве что для этого дьяволоподобного кота. Замечу, правда, что когда я учился, термин "алканы" был не в ходу. Мы говорили "предельные углеводороды".

pofig13 · 13 Май 2018

Vladimir_S написал(а):
Да брось ты — элементарная школьная задачка. Единственная "изюминка" — обход переполнения. Но и это просто.

когда третий раз прочтёшь)), а с первого как то в дурку хочется))

Vladimir_S написал(а):
сложна разве что для этого дьяволоподобного кота.

кот красавец , в химии я вообще за него)

Vladimir_S · 19 Май 2018

Код:

Var
 a1,d,N,S:Word;

Begin
 Write('a1 = '); Readln(a1);
 Write('d = '); Readln(d);
 S:=a1;
 N:=1;
 Writeln('N = ',N:5,'   S = ',S:5);
 Repeat
  if S<=65535-d then
   begin
    S:=S+d;
    N:=N+1;
    Writeln('N = ',N:5,'   S = ',S:5);
   end;
 Until S>65535-d;
 Readln
End.

Прогресии

ZEDT

Ученик

pofig13

КавалерОрденаФлуда

Vladimir_S

Ученик

pofig13

КавалерОрденаФлуда

Vladimir_S

Ученик

Похожие темы