Пусть a, b и c – переменные целого типа (integer). Пусть a > 0 (то есть ее значение не превышает 32767)

@Shnaps1323 · Регистрация: 27.10.2014

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

Чему будет равна переменная b после выполнения следующего фрагмента программы? Приведите несколько примеров ее работы (что будет получено при задании конкретных данных), после чего сформулируйте общее правило. Подробно опишите способ вашего решения.

c:=10000; b:=0; while c>0 do begin b:=b+a div c mod 10; c:= c div 10; end ;

@Joy · 11.11.2014, 06:28

b =0 т.к. в вашем выражении заранее не определено значение переменной a. Если a определено, то код считает сумму цифр, т.е. если a=12345, то в b=15

Добавлено через 7 минут

Pascal

var
  c,b,a:integer;
begin  
  readln(a);
   c:=10000; 
   b:=0; 
   while c>0 do begin 
     b:=b+a div c mod 10; 
     c:= c div 10; 
     writeln('b=',b,'  c=',c);
   end ;
writeln(b);
end.

@Shnaps1323 1 / 1 / 0 Регистрация: 27.10.2014 Сообщений: 19
		1
	Пусть a, b и c – переменные целого типа (integer). Пусть a > 0 (то есть ее значение не превышает 32767) 10.11.2014, 16:12. Показов 2174. Ответов 1 Метки нет (Все метки) Чему будет равна переменная b после выполнения следующего фрагмента программы? Приведите несколько примеров ее работы (что будет получено при задании конкретных данных), после чего сформулируйте общее правило. Подробно опишите способ вашего решения. c:=10000; b:=0; while c>0 do begin b:=b+a div c mod 10; c:= c div 10; end ; 0

	11.11.2014, 06:28

Опции темы

Пусть a, b и c – переменные целого типа (integer). Пусть a > 0 (то есть ее значение не превышает 32767)

Решение