Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: Консультации по информатике

Подписаться Бесплатная «Серебряная» новостная рассылка . Подписчиков 293 RSS
←   Апрель 2011   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30


За последние 60 дней ни разу не выходила


Сайт рассылки: http://rusfaq.ru/issues/8/19/228
Открыта: 17-04-2009

Автор
Калашников О.А.

Статистика

293 подписчиков
0 за неделю
←   Все выпуски   →

RFpro.ru: Консультации по информатике


Хостинг портала RFpro.ru:
Московский хостер
Профессиональный ХОСТИНГ на базе Linux x64 и Windows x64

РАССЫЛКИ ПОРТАЛА RFPRO.RU

Лучшие эксперты данной рассылки

Асмик Александровна
Статус: Академик
Рейтинг: 7580
∙ повысить рейтинг » 		Абаянцев Юрий Леонидович aka Ayl
Статус: Профессионал
Рейтинг: 2366
∙ повысить рейтинг » 		Роман Селиверстов
Статус: Академик
Рейтинг: 1951
∙ повысить рейтинг »

/ НАУКА И ОБРАЗОВАНИЕ / Точные и естественные науки / Информатика

Номер выпуска:218
Дата выхода:02.04.2011, 13:30
Администратор рассылки:lamed (Профессор)
Подписчиков / экспертов:135 / 136
Вопросов / ответов:0 / 0

Статья отправлена lamed (Профессор)
дата отправки: 02.04.2011, 12:07

ЕГЭ-2011. C2. Задачи 1-5. Basic

Добрый день, уважаемые читатели. Начинаем выкладывать решения заданиий для подготовки к ЕГЭ по информатике, C2. Basic.

Источники заданий:
1. Демонстрационные варианты ЕГЭ 2004-2011 гг.
2. Гусева И.Ю. ЕГЭ. Информатика: раздаточный материал тренировочных тестов. — СПб: Тригон, 2009.
3. Самылкина Н.Н., Островская Е.М. Информатика: тренировочные задания. – М.: Эксмо, 2009.
4. Якушкин П.А., Ушаков Д.М. Самое полное издание типовых вариантов реальных заданий ЕГЭ 2010. Информатика. — М.: Астрель, 2009.
Для разработки программ использованы решения на языке Pascal, представленные К.Ю.Поляковым в файле answC2.doc
Нумерация заданий соответствует приведенной в файле C2.doc
Всю ответственность за допущенные в решениях на Basic несет автор решений: lamed.
С вопросами и пожеланиями обращайтесь в личную почту lamed@rfpro.ru.
Удачи!

Код:
REM Задание 1. Опишите на русском языке или одном из языков программирования алгоритм поиска
REM номера первого из
двух последовательных элементов в целочисленном массиве из 30 элементов, 
REM сумма которых максимальна (если таких пар несколько, то можно выбрать любую из них).

N = 30
DIM A(1 TO N) AS INTEGER
DIM i AS INTEGER, i1 AS INTEGER, Sum AS INTEGER

  FOR i = 1 TO N
    INPUT A(i)
  NEXT i
  i1 = 1
  Sum = A(1) + A(2)
  FOR i = 2 TO N - 1
    IF A(i) + A(i + 1) > Sum THEN
      i1 = i
      Sum = A(i)
  + A(i + 1)
    END IF
  NEXT i
  PRINT i1
END

Код:
REM Задание 2. Опишите на русском языке или одном из языков программирования алгоритм 
REM подсчета числа элементов, равных
максимальному, в числовом массиве из 30 элементов.

N = 30
DIM a(1 TO N) AS INTEGER
DIM max AS INTEGER, k AS INTEGER, i AS INTEGER
  FOR i = 1 TO N
    INPUT a(i)
  NEXT i
 
  k = 1
  max = a(1)
  FOR i = 2 TO N
    IF a(i) > max THEN
      max = a(i)
      k = 1
    ELSEIF a(i) = max THEN
      k = k + 1
    END IF
  NEXT i
 
  PRINT k
END

Код:
REM Задание 3. Опишите на русском языке или одном из языков программирования алгоритм поиска
REM трех последовательных элементов, сумма которых максимальна, в числовом массиве
REM из 30 элементов.

N = 30
DIM a(1 TO N) AS INTEGER
DIM Max AS INTEGER, Sum AS INTEGER, i AS INTEGER, k AS INTEGER
  FOR i = 1 TO N
    INPUT a(i)
  NEXT i
  Sum = a(1) + a(2) + a(3)
  Max = Sum
  k = 1
  FOR i = 2 TO N - 2
    Sum = Sum - a(i - 1) + a(i + 2)' или Sum=a(i)+a(i+1)+a(i+2)
    IF Sum > Max THEN
      Max = Sum
      k = i
    END IF
  NEXT i
  FOR i = k TO k + 2
    PRINT "A[
 "; i; "]="; a(i)
  NEXT i
END

< b>Код:
REM Задание 4. Дан прямоугольный массив целых положительных чисел 10 х 20.
REM Опишите на русском языке или на одном из языков программирования алгоритм поиска строки
REM с наименьшей суммой элементов. Вывести на печать номер строки и сумму ее элементов.
REM
Предполагается, что такая строка единственная.

N = 10
M = 20
DIM a(1 TO N, 1 TO M) AS INTEGER
DIM min AS INTEGER, Sum AS INTEGER, iMin AS INTEGER, i AS INTEGER, k AS INTEGER
  REM  ввод матрицы N на N
  FOR i = 1 TO N
    FOR k = 1 TO M
      INPUT a(i, k)
    NEXT k
  NEXT i
  
  Sum = 0
  FOR k = 1 TO M
    Sum = Sum + a(1, k)
  NEXT k
  
  min = Sum
  iMin = 1
  FOR i = 
 2 TO N
    Sum = 0
    FOR k = 1 TO M
      Sum = Sum + a(i, k)
    NEXT k
    IF Sum < min THEN
      min = Sum
      iMin = i
    END IF
  NEXT i
  
  PRINT "Строка "; iMin; " сумма "; min
END

Код:
REM Задание 5. Дан квадратный массив целых положительных чисел 10 х 10.
REM Опишите на русском языке или на одном из языков программирования алгоритм вычисления суммы
REM элементов строки, в которой расположен элемент с максимальным значением.
REM Вывести значение суммы на печать. Предполагается, что такой элемент единственный.

N = 10
DIM A(1 TO N, 1 TO N)
  AS INTEGER
DIM Max AS INTEGER, Sum AS INTEGER, iMax AS INTEGER, i AS INTEGER, k AS INTEGER

  REM ввод матрицы N на N
  FOR i = 1 TO N
    FOR k = 1 TO N
      INPUT A(i, k)
    NEXT k
  NEXT i
  
  iMax = 1
  Max = A(1, 1)
  FOR i = 1 TO N
    FOR k = 1 TO N
      IF A(i, k) > Max THEN
        Max = A(i, k)
        iMax = i
      END IF
    NEXT k
  NEXT i
    
  Sum = 0
  FOR k = 1 TO N

   Sum = Sum + A(iMax, k)
  NEXT k
  PRINT Sum
END

Оценить выпуск »
Нам очень важно Ваше мнение об этом выпуске рассылки!

Задать вопрос экспертам этой рассылки »

Скажите "спасибо" эксперту, который помог Вам!

Отправьте СМС-сообщение с тестом #thank НОМЕР_ОТВЕТА
на короткий номер 1151 (Россия)
Номер ответа и конкретный текст СМС указан внизу каждого ответа.

Полный список номеров »

* Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи. (полный список тарифов)
** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются.
*** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании.

© 2001-2011, Портал RFPRO.RU, Россия
Авторское право: ООО "Мастер-Эксперт Про"
Калашников О.А. | Гладенюк А.Г.
Хостинг: Компания "Московский хостер"
Версия системы: 2011.6.30 от 30.03.2011
В избранное