Анализ программ, содержащей циклы и ветвления
презентация к уроку по информатике и икт (11 класс)

Слайд 1

Анализ программы, содержащей циклы и ветвления

Слайд 2

№ 1 Ниже записана программа. Получив на вход число , эта программа печатает два числа, и . Укажите наибольшее из таких чисел , при вводе которых алгоритм печатает сначала 3, а потом 7. var x, L, M: longint ; begin readln (x); L:=0; M:=0; while x > 0 do begin L:= L + 1; M:= M + x mod 10; x:= x div 10; end; writeln (L); write(M); end.

Слайд 3

№ 2 Ниже записана программа. Получив на вход число , эта программа печатает два числа, и . Укажите наибольшее из таких чисел , при вводе которых алгоритм печатает сначала 3, а потом 8. var x, L, M: longint ; begin readln (x); L:=0; M:=0; while x > 0 do begin L:= L + 1; if x mod 2 = 0 then M:= M + x mod 10; x:= x div 10; end; writeln (L); write(M); end.

Слайд 4

№ 3 Ниже записана программа. Получив на вход число , эта программа печатает два числа, и . Укажите наибольшее из таких чисел , при вводе которых алгоритм печатает сначала 3, а потом 0. var x, L, M: longint ; begin readln (x); L:=0; M:=0; while x > 0 do begin L:= L + 1; if x mod 2 = 0 then M:= M + x mod 10; x:= x div 10; end; writeln (L); write(M); end.

Слайд 5

№ 4 Ниже записана программа. Получив на вход число , эта программа печатает два числа, и . Укажите наибольшее из таких чисел , при вводе которых алгоритм печатает сначала 3, а потом 8. var x, L, M: longint ; begin readln (x); L:=0; M:=0; while x > 0 do begin L:= L + 1; if x mod 2 = 1 then M:= M + x mod 10; x:= x div 10; end; writeln (L); write(M); end.

Слайд 6

№ 5 Ниже записана программа. Получив на вход число , эта программа печатает два числа, и . Укажите наибольшее из таких чисел , при вводе которых алгоритм печатает сначала 2, а потом 72. var x, a, b: longint ; begin readln (x); a:=0; b:=1; while x>0 do begin a:=a+1; b:=b*(x mod 10); x:= x div 10; end; writeln (a); write(b); end.

Слайд 7

№ 6 Ниже записана программа. Получив на вход число , эта программа печатает два числа, и . Укажите наибольшее из таких чисел , при вводе которых алгоритм печатает сначала 2, а потом 14. var x, a, b : longint ; begin readln (x); a := 0; b := 1; while x > 0 do begin a := a + 1; b := b * (x mod 10); x := x div 10; end; writeln (a); write(b); end.

Слайд 8

№ 7 Ниже записана программа. Получив на вход число , эта программа печатает два числа, и . Укажите наибольшее из таких чисел , при вводе которых алгоритм печатает сначала 3, а потом 7. var x, a, b : longint ; begin readln (x); a := 0; b := 1; while x > 0 do begin a := a + 1; b := b * (x mod 10); x := x div 10; end; writeln (a); write(b); end.

Слайд 9

№ 8 Ниже записана программа. Получив на вход число , эта программа печатает два числа, и . Укажите наибольшее из таких чисел , при вводе которых алгоритм печатает сначала 3, а потом 0. var x, a, b : longint ; begin readln (x); a := 0; b := 1; while x > 0 do begin a := a + 1; b := b * (x mod 10); x := x div 10; end; writeln (a); write(b); end.

Слайд 10

№ 9 Ниже записана программа. Получив на вход число , эта программа печатает два числа, и . Укажите наименьшее из таких чисел , при вводе которых алгоритм печатает сначала 3, а потом 7. var x, L, M: longint ; begin readln (x); L:=0; M:=0; while x > 0 do begin L:= L + 1; M:= M + x mod 10; x:= x div 10; end; writeln (L); write(M); end.

Слайд 11

№ 10 Ниже записана программа. Получив на вход число , эта программа печатает два числа, и . Укажите набольшее из таких чисел , при вводе которых алгоритм печатает сначала 3, а потом 24. var x, a, b : longint ; begin readln (x); a := 0; b := 1; while x > 0 do begin a := a + 1; b := b * (x mod 8); x := x div 8; end; writeln (a); write(b); end. Ответ записать в 10 с. с ч .

Слайд 12

№ 11 Ниже записана программа. Получив на вход число , эта программа печатает два числа, и . Укажите наименьшее из таких чисел , при вводе которых алгоритм печатает сначала 3, а потом 6. var x, a, b : longint ; begin readln (x); a := 0; b := 1; while x > 0 do begin a := a + 1; b := b * (x mod 6); x := x div 6; end; writeln (a); write(b); end. Ответ записать в 10 с. с ч .

Слайд 13

№ 12 Укажите наибольшее натуральное число, при вводе которого эта программа напечатает сначала 3, потом – 6. var x, L, M: integer; begin readln (x); L:=0; M:=0; while x > 0 do begin L:=L + 1; if (x mod 8) <> 0 then M:= M + x mod 8; x:= x div 8; end; writeln (L); write(M); end. Ответ записать в 10 с. с ч .

Слайд 14

№ 13 Укажите наибольшее натуральное число, при вводе которого эта программа напечатает сначала 14, потом – 3. var x, L, M: integer; begin readln (x); L := 0; while x > 0 do begin M := M + 1; if x mod 2 <> 0 then L := L + x mod 8; x := x div 8 end; writeln (L); writeln (M) end. Ответ записать в 10 с. с ч .