Напишите программу для Паскаля АБС (старая версия)
Сумма от 1 до 5 Написать Сумма_до
То есть вид программы Сумма_до
Аноним:
В Паскале есть три вида циклов: For, While и Repeat Until - с параметром, с предусловием, и с постусловием соответственно. "For" = "для", это ещё ясно, но здесь - не знаю, выбирайте из оставшихся=)
Repeat
Repeat Until
Ответы
Ответ дал:
0
Var
S,i:integer;
Begin
S:=0;
i:=1;
Repeat
S:=S+i;
i:=i+1
Until i > 5;
WriteLn('S = ',S);
End.
S,i:integer;
Begin
S:=0;
i:=1;
Repeat
S:=S+i;
i:=i+1
Until i > 5;
WriteLn('S = ',S);
End.
Вас заинтересует
1 год назад
3 года назад
3 года назад
8 лет назад
8 лет назад