ЕГЭ 2011 Информатика и ИКТ Консультация 3 18 марта

Пример 1.Запишите значение переменной y после выполнения фрагмента алгоритма.

Xy

Xy 110

Пример 1.Запишите значение переменной y после выполнения фрагмента алгоритма. Xy

Пример 1.Запишите значение переменной y после выполнения фрагмента алгоритма. Xy

Пример 1.Запишите значение переменной y после выполнения фрагмента алгоритма. Xy

Пример 1.Запишите значение переменной y после выполнения фрагмента алгоритма. Xy

Пример 2.Запишите значение переменной y после выполнения фрагмента алгоритма. Xy 11 23

Xy

Пример 2.Запишите значение переменной y после выполнения фрагмента алгоритма. Xy y = 1 + ( ) + ( ) = 1 + ( ) + ( ) = 511

Пример 3. Значения двух массивов a[1..100] и b[1..100] задаются с помощью следующего фрагмента программы. Какой элемент массива B будет наименьшим (указать его номер)? Бейсик FOR t=1 TO 100 A(t)=(t-80)*(t-80) NEXT t FOR t=1 TO 100 B(101-t)=A(t) NEXT t Паскаль for t:=1 to 100 do a[t]:=(t-80)*(t-80); for t:=1 to 100 do b[101-t]:=a[t] Си for(t=1;t

Бейсик FOR t=1 TO 100 A(t)=(t-10) NEXT t Паскаль for t:=1 to 100 do a[t]:=(t-10); Си for(t=1;t

A(1)A(2)A(3)A(9)A(10)A(11)A(100) Бейсик FOR t=1 TO 100 A(t)=(t-10) NEXT t FOR t=1 TO 100 B(t)=A(t)*t NEXT t Паскаль for t:=1 to 100 do a[t]:=(t-10); for t:=1 to 100 do b[t]:=a[t]*t; Си for(t=1;t

Пример 4.

Ответ: (n*n-n)/2

Пример 5.

НАЧАЛО ПОКА влево ПОКА вниз ПОКА вправо ПОКА вверх КОНЕЦ

Задание С1 Задача относится к повышенному уровню сложности Программа содержит некоторое количество условий (циклов и массивов нет) Необходимо найти ошибку в программе (смысловую, а не синтаксическую) Изменить программу для устранения случаев неправильной работы

Пример 6 (С1). Требовалось написать программу, которая вводит с клавиатуры координаты точки на плоскости (x,y – действительные числа) и определяет принадлежность точки заштрихованной области, включая ее границы. Программист торопился и написал программу неправильно. 1.Приведите пример таких чисел x, y, при которых программа неверно решает поставленную задачу. 2.Укажите, как нужно доработать программу, чтобы не было случаев ее неправильной работы. (Это можно сделать несколькими способами, поэтому можно указать любой способ доработки исходной программы). Бейсик INPUT x, y IF y

Бейсик INPUT x, y IF y

Бейсик INPUT x, y IF y

Бейсик INPUT x, y IF (y =x*x-2) THEN PRINT "принадлежит ELSE PRINT "не принадлежит ENDIF END Паскаль var x,y: real; begin readln(x,y); if ((y =x*x-2) then write('принадлежит') else write('не принадлежит') end. Си void main(void) { float x,y; scanf("%f%f",&x,&y); if (((y =x*x-2)) printf("принадлежит"); else printf("не принадлежит"); } Приведите пример таких чисел x, y, при которых программа неверно решает поставленную задачу. Возможный ответ x = 3 и y=3

Задание С2 Написать короткую (15 строк) простую программу (например, обработка массива) Программа линейной обработки входной последовательности

Пример 7. (С2) Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значения от 0 до Опишите на русском языке или на одном из языков программирования алгоритм, который позволяет подсчитать и вывести среднее арифметическое элементов массива, имеющих нечетное значение. Гарантируется, что в исходном массиве хотя бы один элемент имеет нечетное значение. Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них.

Паскаль const N=30; var a: array [1..N] of integer; i, x, y: integer; s: real; begin for i:=1 to N do readln(a[i]); Бейсик N=30 DIM A(N) AS INTEGER DIM I, X, Y AS INTEGER DIM S AS SINGLE FOR I = 1 TO N INPUT A(I) NEXT I Си #include #define N 30 void main(void) {int a[N]; int i, x, y; float s; for (i=0; i

Паскаль const N=30; var a: array [1..N] of integer; i, x, y: integer; s: real; begin for i:=1 to N do readln(a[i]); x:=0; y:=0; for i:=1 to N do if (a[i] mod 2=1) then begin x:=x+a[i]; y:=y+1; end; s:=x/y; writeln(s); end. Бейсик N=30 DIM A(N) AS INTEGER DIM I, X, Y AS INTEGER DIM S AS SINGLE FOR I = 1 TO N INPUT A(I) NEXT I X = 0 Y = 0 FOR I = 1 TO N IF A(I) MOD 2 = 1 THEN X = X + A(I) Y = Y + 1 ENDIF NEXT I S = X / Y PRINT S Си #include #define N 30 void main(void) {int a[N]; int i, x, y; float s; for (i=0; i

Пример 8. (С2) Опишите на русском языке или одном из языков программирования алгоритм вычисления количества наибольших элементов в заданном целочисленном массиве из 30 элементов.

Паскаль var a:array[1..30] of integer; i, k, max: integer; begin for i:=1 to 30 do read(a[i]); Бейсик DIM I, K, max, A(30) AS INTEGER FOR I=1 to 30 INPUT A(I) NEXT I Си void main(void) { int i, k, max, a[30]; for( i=0;i

Паскаль var a:array[1..30] of integer; i, k, max: integer; begin for i:=1 to 30 do read(a[i]); max:=a[1]; k:= 1; Бейсик DIM I, K,max,A(30) AS INTEGER FOR I=1 to 30 INPUT A(I) NEXT I max=A(1): k= 1 Си void main(void) { int i, k, max, a[30]; for( i=0;i

Паскаль var a:array[1..30] of integer; i, k, max: integer; begin for i:=1 to 30 do read(a[i]); max:=a[1]; k:= 1; for i:=2 to 30 do if a [i] > max then Бейсик DIM I, K,max,A(30) AS INTEGER FOR I=1 to 30 INPUT A(I) NEXT I max=A(1): k= 1 FOR I = 2 TO 30 IF A(I) >max THEN Си void main(void) { int i, k, max, a[30]; for( i=0;i

Паскаль var a:array[1..30] of integer; i, k, max: integer; begin for i:=1 to 30 do read(a[i]); max:=a[1]; k:= 1; for i:=2 to 30 do if a [i] > max then begin max:= a[i] ; k:=1 end Бейсик DIM I, K,max,A(30) AS INTEGER FOR I=1 to 30 INPUT A(I) NEXT I max=A(1): k= 1 FOR I = 2 TO 30 IF A(I) >max THEN max = A(I): K=1 Си void main(void) { int i, k, max, a[30]; for( i=0;i

Паскаль var a:array[1..30] of integer; i, k, max: integer; begin for i:=1 to 30 do read(a[i]); max:=a[1]; k:= 1; for i:=2 to 30 do if a [i] > max then begin max:= a[i] ; k:=1 end else if a[i]=max then k:=k+1; Бейсик DIM I, K,max,A( 30 ) AS INTEGER FOR I=1 to 30 INPUT A(I) NEXT I max=A(1): k= 1 FOR I = 2 TO 30 IF A(I) >max THEN max = A(I): K=1 ELSE IF A(I)=max THEN K=K+1 ENDIF Си void main(void) { int i, k, max, a[30]; for( i=0;i

Паскаль var a:array[1..30] of integer; i, k, max: integer; begin for i:=1 to 30 do read(a[i]); max:=a[1]; k:= 1; for i:=2 to 30 do if a [i] > max then begin max:= a[i] ; k:=1 end else if a[i]=max then k:=k+1; write(k) end. Бейсик DIM I, K, MAX,A( 30 ) AS INTEGER FOR I=1 to 30 INPUT A(I) NEXT I MAX=A(1): k= 1 FOR I = 2 TO 30 IF A(I) >MAX THEN MAX = A(I): K=1 ELSE IF A(I)=MAX THEN K=K+1 ENDIF NEXT I PRINT K END Си void main(void) { int i, k, max, a[30]; for( i=0;i< 30;i++) scanf(%d",&a[i]); max=a[0]; k= 1; for( i=1;i< 30;i++) if (a [i] > max) {max= a[i] ; k=1;} else if (a[i]==max) k++; printf(%d,k); }

Паскаль var a:array[1..30] of integer; i, k, max: integer; begin for i:=1 to 30 do read(a[i]); max:=a[1]; k:= 1; for i:=2 to 30 do if a [i] > max then begin max:= a[i] ; k:=1 end else if a[i]=max then k:=k+1; write(k) end. Бейсик DIM I, K, MAX,A( 30 ) AS INTEGER FOR I=1 to 30 INPUT A(I) NEXT I MAX=A(1): k= 1 FOR I = 2 TO 30 IF A(I) >MAX THEN MAX = A(I): K=1 ELSE IF A(I)=MAX THEN K=K+1 ENDIF NEXT I PRINT K END Си void main(void) { int i, k, max, a[30]; for( i=0;i< 30;i++) scanf(%d",&a[i]); max=a[0]; k= 1; for( i=1;i< 30;i++) if (a [i] > max) {max= a[i] ; k=1;} else if (a[i]==max) k++; printf(%d,k); }

Пример 9. (С2) С клавиатуры вводят целые числа. Признак конца ввода - ввод нуля. Опишите на русском языке или одном из языков программирования алгоритм вычисления суммы тех чисел, которые кратны трем. Считаем, что хотя бы одно такое число в последовательности есть.

Паскаль var a, S: integer; begin S:=0; Бейсик DIM A,S AS INTEGER S=0 Си void main() { int a,S; S=0;

Паскаль var a, S: integer; begin S:=0; readln(a); While (a0) do Begin Бейсик DIM A,S AS INTEGER S=0 INPUT A WHILE A 0 Си void main() { int a,S; S=0; scanf(%d",&a); while(a 0) {

Паскаль var a, S: integer; begin S:=0; readln(a); While (a0) do Begin if (a mod 3 = 0) then S:=S+a; Бейсик DIM A,S AS INTEGER S=0 INPUT A WHILE A 0 IF A MOD 3 = 0 THEN S = S+A ENDIF Си void main() { int a,S; S=0; scanf(%d",&a); while(a 0) { if (a % 3 == 0) S+=a;

Паскаль var a, S: integer; begin S:=0; readln(a); While (a0) do Begin if (a mod 3 = 0) then S:=S+a; Readln(a) End; Бейсик DIM A,S AS INTEGER S=0 INPUT A WHILE A 0 IF A MOD 3 = 0 THEN S = S+A ENDIF INPUT A WEND Си void main() { int a,S; S=0; scanf(%d",&a); while(a 0) { if (a % 3 == 0) S+=a; scanf(%d",&a); }

Паскаль var a, S: integer; begin S:=0; readln(a); While (a0) do Begin if (a mod 3 = 0) then S:=S+a; Readln(a) End; writeln(S) end. Бейсик DIM A,S AS INTEGER S=0 INPUT A WHILE A 0 IF A MOD 3 = 0 THEN S = S+A ENDIF INPUT A WEND PRINT S END Си void main() { int a,S; S=0; scanf(%d",&a); while(a 0) { if (a % 3 == 0) S+=a; scanf(%d",&a); } printf(%d,k); }