Студопедия
Случайная страница | ТОМ-1 | ТОМ-2 | ТОМ-3
АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатика
ИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханика
ОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторика
СоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансы
ХимияЧерчениеЭкологияЭкономикаЭлектроника

Выпечка

Читайте также:
  1. СУПЕР-СУШКИ, ЧУДО-ВЫПЕЧКА

13) У исполнителя Калькулятор две команды:

Умножь на 2

Умножь на 3.

Первая из них умножает число на экране на 2, вторая – утраивает его. Сколько различных чисел можно получить из числа 2 с помощью программы, которая содержит не более 3 команд?

14) Определите, какое число будет напечатано в результате выполнения следующего алгоритма:

Var a,b,t,M,R:integer;

Function F(x:integer):integer;

Begin

F:=(x+3)*(1-x);

End;

BEGIN

a:=-5; b:=5;

M:=a; R:=F(a);

for t:=a to b do begin

if (F(t)< R)then begin

M:=t;

R:=F(t);

End;

End;

Write(R);

END.

15) Сколько различных решений имеет система уравнений

(X1 Ù X2) Ú (X1 Ù X2) Ú (X1 º X3) = 1

(X2 Ù X3) Ú (X2 Ù X3) Ú (X2 º X4) = 1

...

(X7 Ù X8) Ú (X7 Ù X8) Ú (X7 º X9) = 1

(X8 Ù X9) Ú (X8 Ù X9) Ú (X8 º X10) = 0

Часть С

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

var x,y: real;

Begin

Readln(x,y);

if y>=0 then

if y>=2-x then

if y<=x*x then

write('принадлежит')

Else

write('не принадлежит')

End.

Последовательно выполните следующее.

1. Перерисуйте и заполните таблицу, которая показывает, как работает программа при аргументах, принадлежащих различным областям (A,B, C, D, E, F,G и H). Точки, лежащие на границах областей, отдельно не рассматривать.

Область y>=0? y>=2-x? y<=x*x? вывод верно?
A          
B          
C          
D          
E          
F          
G          
H          

В столбцах условий укажите "да", если условие выполнится, "нет" если условие не выполнится, "—" (прочерк), если условие не будет проверяться, «не изв.», если программа ведет себя по-разному для разных значений, принадлежащих данной области. В столбце "Программа выведет" укажите, что программа выведет на экран. Если программа ничего не выводит, напишите "—" (прочерк). Если для разных значений, принадлежащих области, будут выведены разные тексты, напишите «не изв». В последнем столбце укажите "да" или "нет".

2. Укажите, как нужно доработать программу, чтобы не было случаев ее неправильной работы. (Это можно сделать несколькими способами, достаточно указать любой способ доработки исходной программы.)

С2.Дан целочисленный массив из 10 элементов, все элементы которого – целые числа в интервале от -1000 до 1000. Опишите на русском языке или на одном из языков программирования алгоритм, который находит минимальное значение из всех нечетных элементов массива, кратных 5. Гарантируется, что хотя бы один такой элемент существует. Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них

Паскаль Естественный язык
const N=10; var a: array [l..N] of integer; i,j,min: integer; begin for i:=l to N do readln(a[i]); ... end. Объявляем массив A из 10 элементов. Объявляем целочисленные переменные i, j, min. В цикле от 1 до 10 вводим элементы массива A с 1-го по 10-й. ...

В качестве ответа вам необходимо привести фрагмент программы (или описание алгоритма на естественном языке), который должен находиться на месте многоточия. Вы можете записать решение также на другом языке программирования (укажите название и используемую версию языка программирования, например, Borland Pascal 7.0) или в виде блок-схемы. В этом случае вы должны использовать те же самые исходные данные и переменные, какие были предложены в условии (например, в образце, записанном на естественном языке).

С3. У исполнителя Калькулятор две команды, которым присвоены номера:


Дата добавления: 2015-08-18; просмотров: 60 | Нарушение авторских прав


Читайте в этой же книге: Часть А | Nil.mpeg | Вверх вниз влево вправо. |
<== предыдущая страница | следующая страница ==>
Readln(x);| Nike.mpeg

mybiblioteka.su - 2015-2024 год. (0.007 сек.)