Вопрос по информатике:
Определить s: 1) Var s,k: integer; Begin s := 0; for k := 14 to 18 do s := s+7; writeln(s); End. 2) Var s,k: integer; Begin s:=0; for k:=1 to 11 do s:=s+12; write(s); End. 3) var s, k:integer; begin s:= 100; for k:= 0 to 10 do s:= s - 5; writeln (s); end.
- 04.05.2018 12:34
- Информатика
- remove_red_eye 6229
- thumb_up 33
Ответы и объяснения 1
1) 35
У нас написано, что s:=0
От k= 14 до 18 прибавляем каждый раз +7
s 7 14 21 28 35
k 14 15 16 17 18
2) 132
Тут такая же схема s:=0
От k=1 до 11 прибавляем к s +12
s 12 24 36 48 60 72 84 96 108 120 132
k 1 2 3 4 5 6 7 8 9 10 11
3) 45
Тут s=100
От k=0 до 10 мы отнимаем от s -5
s 95 90 85 80 75 70 65 60 55 50 45
k 1 2 3 4 5 6 7 8 9 10
- 05.05.2018 05:33
- thumb_up 6
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.