смирнов1127
?>

Var a, b, t, n, p : integer; function f(x: integer): integer; begin f : = 3*(9-x)*(9-x)+12; end; begin a : = -10; b : = 10; p : = 25; n : = 0; for t : = a to b do begin if (f(t) > p) then begin n : = n+1; end; end; write(n); end.

Информатика

Ответы

Zeitlinama7067

программа выдает число 17 что бы это не значило...

eugene869154

На бес­ко­неч­ном поле име­ет­ся вер­ти­каль­ная стена. Длина стены не­из­вест­на. От верх­не­го конца стены впра­во от­хо­дит го­ри­зон­таль­ная стена также не­из­вест­ной длины. Робот на­хо­дит­ся в клет­ке, рас­по­ло­жен­ной слева от ниж­не­го края вер­ти­каль­ной стены.

На ри­сун­ке ука­зан один из воз­мож­ных спо­со­бов рас­по­ло­же­ния стен и Ро­бо­та (Робот обо­зна­чен бук­вой «Р»).

На­пи­ши­те для Ро­бо­та ал­го­ритм, за­кра­ши­ва­ю­щий все клет­ки, рас­по­ло­жен­ные левее вер­ти­каль­ной стены и выше го­ри­зон­таль­ной стены и при­ле­га­ю­щие к ним. Робот дол­жен за­кра­сить толь­ко клет­ки, удо­вле­тво­ря­ю­щие дан­но­му усло­вию. На­при­мер, для при­ведённого выше ри­сун­ка Робот дол­жен за­кра­сить сле­ду­ю­щие клет­ки (см. ри­су­нок).

Ко­неч­ное рас­по­ло­же­ние Ро­бо­та может быть про­из­воль­ным. Ал­го­ритм дол­жен ре­шать за­да­чу для про­из­воль­но­го раз­ме­ра поля и лю­бо­го до­пу­сти­мо­го рас­по­ло­же­ния стен внут­ри пря­мо­уголь­но­го поля. При ис­пол­не­нии ал­го­рит­ма Робот не дол­жен раз­ру­шить­ся. Ал­го­ритм на­пи­ши­те в тек­сто­вом ре­дак­то­ре и со­хра­ни­те в тек­сто­вом файле. На­зва­ние файла и ка­та­лог для со­хра­не­ния Вам со­об­щат ор­га­ни­за­то­ры эк­за­ме­на.

cmdkotelniki

1) Real - ?

2) Integer - А. Кількість учнів у класі

3) String - В. Назва дня тижня

4) array[1..30] of real - Б. Середньодобова температура повітря

Объяснение:

Real - тип данных с плавающей точкой. Сюда можно отнести и вариант Б (если брать среднее арифметическое, например).

Integer - целочисленный тип данных. Количество учеников - всегда натуральное число.

String - строчный тип данных. Например, слово. Название дня недели - это строчный тип данных

array[1..30] of real - массив, состоящий из 30-ти элементов вещественного типа данных. Сюда можно поместить температуру воздуха, так как она зачастую не целое число.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Var a, b, t, n, p : integer; function f(x: integer): integer; begin f : = 3*(9-x)*(9-x)+12; end; begin a : = -10; b : = 10; p : = 25; n : = 0; for t : = a to b do begin if (f(t) > p) then begin n : = n+1; end; end; write(n); end.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

atenza3736
Евгеньевич Балиловна1398
filimon131262
Panda062000
tochkamail7
ovdei71
Константиновна
Олег86
eizmaylova6
orinvarostov
narkimry134
Galkin683
Мусаев Игоревич371
vitbond12
Федорович Шахова241