Предмет: Информатика, автор: jsffshsh

даю 27 балов!!!помогите пж до 13:30 по мск
s:=0;
i:=5;
repeat
s:=s+6 div i;
i:=i-1;
until i<1;
write (s);

Ответы

Автор ответа: gfhjkmgfhjkm20
1

Ответ:

13

Объяснение:

s = 0       i = 5

Действия в цикле:

1) s = s + 6 div i

2) i = i - 1

Цикл продолжает работу пока ложно (нет) условие i < 1

Вывод s

s = 0       i = 5

Действия в цикле:

1) s = s + 6 div i = 0 + 6 div 5 = 0 + 1 = 1

2) i = i - 1 = 5 - 1 = 4

4 < 1     (нет)

s = 1       i = 4

Действия в цикле:

1) s = s + 6 div i = 1 + 6 div 4 = 1 + 1 = 2

2) i = i - 1 = 4 - 1 = 3

3 < 1     (нет)

s = 2       i = 3

Действия в цикле:

1) s = s + 6 div i = 2 + 6 div 3 = 2 + 2 = 4

2) i = i - 1 = 3 - 1 = 2

2 < 1     (нет)

s = 4       i = 2

Действия в цикле:

1) s = s + 6 div i = 4 + 6 div 2 = 4 + 3 = 7

2) i = i - 1 = 2 - 1 = 1

1 < 1     (нет)

s = 7       i = 1

Действия в цикле:

1) s = s + 6 div i = 7 + 6 div 1 = 7 + 6 = 13

2) i = i - 1 = 1 - 1 = 0

0 < 1     (да)

Цикл заканчивает работу

s = 13       i = 0


jsffshsh: поэтому мне нужна помощь
jsffshsh: там всего 7 заданий таких
gfhjkmgfhjkm20: Можешь проверять в программе ) Даже для телефона на андроиде есть Pascal N-IDE )
gfhjkmgfhjkm20: Больше 3 заданий в вопрос помещать нельзя )
jsffshsh: я знаю
jsffshsh: я сюда в комментарии отправлю
jsffshsh: можно?
jsffshsh: а как этим приложением пользоваться?
jsffshsh: кстати я могу тебе писать в собщение
gfhjkmgfhjkm20: Просто ставишь из Play Маркет и там вводить программу на паскале.
Похожие вопросы