Трассировка циклов

@оксана96 · Регистрация: 12.09.2015

Author24 — интернет-сервис помощи студентам

7. Пусть а – целая переменная. Чему будет равна переменная b после выполнения следующе-
го фрагмента программы? Приведите несколько примеров ее работы (что будет получено
при задании конкретных данных), после чего сформулируйте общее правило
b:=1;while a>0 do begin b:=b*a ; a:=a−2;end ;

8. Пусть a – целая переменная с положительным значением. Чему будет равна переменная b
после выполнения следующего фрагмента программы? Приведите несколько примеров ее
работы (что будет получено при задании конкретных данных), после чего сформулируйте
общее правило
b:=0;while a>0 do begin b:=b+a mod 10 ; a:=a div 10 ;end ;

9. Пусть a – целая переменная с положительным значением (integer, не более 32767). Чему
будет равна переменная b после выполнения следующего фрагмента программы? Приве-
дите несколько примеров ее работы (что будет получено при задании конкретных данных),
после чего сформулируйте общее правило
c :=10000;b:=0;while c>0 do begin b:=b+a div c mod 10 ; c :=c div 10 ; end ;

10. Пусть a – целая переменная с положительным значением (integer, не более 32767). Чему
будет равна переменная b после выполнения следующего фрагмента программы? Приве-
дите несколько примеров ее работы (что будет получено при задании конкретных данных),
после чего сформулируйте общее правило
c :=1;b:=0;while c<=1000 do begin b:=b+a div c mod 10 ; c :=c *10; end ;

@Puporev · 04.01.2016, 13:35

7.
Напишите такую программу и запустите

Pascal

var i,a,b:integer;
begin
for i:=1 to 10 do
 begin
  b:=1;
  a:=i;
  while a>0 do
   begin
    b:=b*a ;
    a:=a-2;
   end;
  writeln(b)
 end;
readln
end.

Получите такую последовательность.
1, 2, 3, 8, 15, 48, 105, 384, 945, 3840
На нечетных позициях 1,1*3,1*3*5,1*3*5*7,1*3*5*7*9
На четных 2,2*4,2*4*6,2*4*6*8,2*4*6*8*10
Это двойной факториал числа An=n!!

Добавлено через 8 минут
8. Это вычисление суммы цифр числа.

Добавлено через 7 минут
9. Это тоже вычисление суммы цифр числа до 32767

Добавлено через 14 минут
10. Тоже что и 9, но сумма считается не с последней, а с первой цифры+опечатка не while c<=1000, а while c<=10000

@оксана96 0 / 0 / 0 Регистрация: 12.09.2015 Сообщений: 60
		1
	Трассировка циклов 04.01.2016, 12:12. Показов 2669. Ответов 1 Метки нет (Все метки) 7. Пусть а – целая переменная. Чему будет равна переменная b после выполнения следующе- го фрагмента программы? Приведите несколько примеров ее работы (что будет получено при задании конкретных данных), после чего сформулируйте общее правило b:=1;while a>0 do begin b:=ba ; a:=a−2;end ; 8. Пусть a – целая переменная с положительным значением. Чему будет равна переменная b после выполнения следующего фрагмента программы? Приведите несколько примеров ее работы (что будет получено при задании конкретных данных), после чего сформулируйте общее правило b:=0;while a>0 do begin b:=b+a mod 10 ; a:=a div 10 ;end ; 9. Пусть a – целая переменная с положительным значением (integer, не более 32767). Чему будет равна переменная b после выполнения следующего фрагмента программы? Приве- дите несколько примеров ее работы (что будет получено при задании конкретных данных), после чего сформулируйте общее правило c :=10000;b:=0;while c>0 do begin b:=b+a div c mod 10 ; c :=c div 10 ; end ; 10. Пусть a – целая переменная с положительным значением (integer, не более 32767). Чему будет равна переменная b после выполнения следующего фрагмента программы? Приве- дите несколько примеров ее работы (что будет получено при задании конкретных данных), после чего сформулируйте общее правило c :=1;b:=0;while c<=1000 do begin b:=b+a div c mod 10 ; c :=c 10; end ; 0

	04.01.2016, 13:35

Трассировка циклов

Решение