Пожалуйста помогите составить блок схему ,. "Найти сумму первых десяти чисел, кратных пяти"..

0
Var S,i,j:integer;
Begin
S:=0;
i:=0;
j:=0;
Repeat
i:=i+1;
if i mod 5 = 0 then
Begin
S:=S+i;
j:=j+1;
End;
Until j=5;
WriteLn(S)
End.
17 февраля аноним,  в категории Компьютеры, Интернет
 
Ваш ответ
Отображаемое имя (по желанию):
Анти-спам проверка:

3 Ответы
0
17 февраля аноним, 
Зачем энд это ж питон
0
17 февраля аноним, 
вычисляется аналитически, как сумма элементов арифметической прогрессии
0
17 февраля аноним, 
На XD
q = input(": ").split(" ")
a = 0
w = ""
r = 0
for i in q:
 if int(i) % 5 == 0:
 a += 1
 w += i + " "
 if a == 10:
 break
w = w.split(" ")
w = w[0:-1]
for i in w:
 r += int(i)
print(r)
Copyright © 2016 Вопросы и ответы онлайн - sovety.info | Для связи: site@sovety.info
Мнение редакции может не совпадать с мнением авторов вопросов и ответов.
Индекс цитирования
...