Перейти к содержимому
La2Base
Главная
ЗагрузкиВикиФорумFAQ
Поиск
ruen
Регистрация Войти
ГлавнаяФайлыВикиВойти
  • Главная
  • Загрузки
  • Вики
  • FAQ
  • Обратная связь
  • О проекте
  • Правила
  • Конфиденциальность
  • Условия использования

© 2026 la2base.com · Все права защищены

ruen
Форум/Флуд/Одномерные массивы
Поиск

Одномерные массивы

20 ответов277 просмотровСейчас просматривают: 1
S
Sheriff
· 24.02.2010, 20:35

Во общем нужно сделать несколько заданий я в єтой теме нуб :) У кого есть желания помочь отпишите :)

1. Доступ к єлементу массива осуществляется по его ...
а) Адресу
б) Имени
с) Номеру
д) Ничего из вышеперечисленного

3.В каком из условных операторов допущена синтаксическая ошибка ?
а) if B = 0 the Writeln('Деление на нуль невозможно.');
б) if a> b the max := a else max :=b;
с) if (a>b) and (b>0) the c:=a+b
d) if a < b the min :=a; else min :=b;


4. Массив D состоит из нечетных чисел от 11 до 21. Установите тип массива
а) вещественный
б) целый
с) символьный
д) логический

5. Выберите строчку в которой присутсвует неправильное обращение к элементу одномерного массива
а) a[2]:=3*a[2.5]-2;
b) write(x[3*k-2]);
c) readln (b[p+k]);
d) x[i]:=y[1+n mod 2]:

6. Запишите имя команды для объявления массива на языке прогромирования Паскаль
7. Как называется параметр, определяющий место элемента в массиве?
8. Сколько элементов в массиве А=2, -2, 2, -2, 2 ?

P.S. За ранее благодарю

0
L
Linefine
· 24.02.2010, 21:11

Честно говоря, не уверен, паскаль изучал годиков так 6 назад в последний раз)
1. Доступ к єлементу массива осуществляется по его ...
с) Номеру

3.В каком из условных операторов допущена синтаксическая ошибка ?
d) if a < b the min :=a; else min :=b;


4. Массив D состоит из нечетных чисел от 11 до 21. Установите тип массива
б) целый

5. Выберите строчку в которой присутсвует неправильное обращение к элементу одномерного массива
а) a[2]:=3*a[2.5]-2;

6. Запишите имя команды для объявления массива на языке прогромирования Паскаль
array of
7. Как называется параметр, определяющий место элемента в массиве?
Индекс
8. Сколько элементов в массиве А=2, -2, 2, -2, 2 ?
5



Но честно говорю, это навскидку, насколько я помню и больше не для тебя, а чтобы проверить свои знания=)

0
S
Sheriff
· 24.02.2010, 21:45

Благодарю :)

0
L
Linefine
· 24.02.2010, 21:49

Не благодари, я же говорю, тут наверняка половина неправильно) Это я так, попробовал. Нужен кто-то знающий, я сам жду)

0
tsa
tsa

Автор

Ветеран

Постов: 566

На форуме с: 10.05.2009

Репутация: +132

Рейтинг: 0

· 24.02.2010, 21:50

Сам бы почитал про массивы да ответил бы, а то сейчас насоветуют и 2 получишь 3c2f1c34aa11.gif

0
S
Sheriff
· 24.02.2010, 21:52

Linefine да тут ещё знакомый Мераклина(Евгения) подсказал мне он в етом вроде как шарит, у него ответы как у тебя)) Хотя он раньше мне написал)) чем я создал эту тему))

0
L
Linefine
· 24.02.2010, 21:52

До прихода "учителя" поправлюсь про массивы, ответ вроде как 6. Там в одном элементе размерность вроде храниться, если это правильные воспоминания)

0
Кирилл
Кирилл

Пользователь

Бывалый

Постов: 351

На форуме с: 03.03.2007

Репутация: +301

Рейтинг: 0

· 24.02.2010, 22:15

Linefine: До прихода "учителя" поправлюсь про массивы, ответ вроде как 6. Там в одном элементе размерность вроде храниться, если это правильные воспоминания)

Как ты себе это представляешь ?

0
M
MoMMoN
· 24.02.2010, 22:23

1) вообще-то индексу, но это и есть номер. Скорее всего - С. Но тут не уверен.
3) a
4) б
5) а
6) S:=array[1..n] of real

S-имя массива, n-число элементов массива, real - тип данных
7) Индекс
8) Немного не понял записи, но скорее всего 5.

0
W
WasleY
· 24.02.2010, 22:43

1. -
3. a
4. б
5. a

0
S
Sheriff
· 24.02.2010, 23:04

Спасибо всем за помощь

0
X
XTreme94

Пользователь

Участник

Постов: 64

На форуме с: 27.08.2009

Рейтинг: 0

· 25.02.2010, 01:39

3-Очень спорно:)
а) if B = 0 the Writeln('Деление на нуль невозможно.'); //тут например B=0 неправильно,надо так B:=0
б) if a> b the max := a else max :=b; //вот это хз,вроде правльно
с) if (a>b) and (b>0) the c:=a+b //нету ; хотя фиг знает,мб это ещё не конец строки
d) if a < b the min :=a; else min :=b; //между if и else на сколько помню ; не ставиться:)

Трудноватый вобще такой вопрос
А по массивам не помню,давно паскаль изучали,хотя синтаксис до сих пор более менее помню)

0
M
MasterKamael
· 25.02.2010, 04:40

1 -d //без комментариев a[i], a - конкретный массив, [индекс нужного элемента]
3: Уточни, может быть ты вообще не так переписал (но я дам комментарий к каждому):

а) if B = 0 then Writeln('Деление на нуль невозможно.'); \\ тут всё ок, но только для паскаля! если не для паскаля, то неверное, ибо равенство проверяется не знаком "=", а знаком "=="
б) if a>b then max:=a else max:=b; \\ тут всё ок
с) if (a>b) and (b>0) then c:=a+b \\тут будет всё ок, если в конце будет стоть ";"
d) if a < b then min:=a; else min:=b; \\тут будет всё ок, если после min:=a убрать ";" и стоять скобки (a<b)



4 б //поскольку в массиве только нечетные числа, то они относятся к типу integer! integer - это целый тип (real - с плавающей точкой, он сюда не идёт, string - строка символьная, boolean - логический (тру\фалс))
5 а //индекс должен быть типа integer, то есть целым, поэтому в правой части этого выражения неверно
6:
const
N=100; //здесь объявляем константу, которая указывает на число элелементов в массиве
type
Mas=array[1..N] of integer; //описываем тип, вместо integer можно написать boolean, real, string и т.д., т.е. тип данных, который будет в массиве
var
A:Mas; //объявляем переменную, после этой команды переменная A будет типа Mas, который описан выше, как массив.

7: Индекс
8: 5 //просто в этом массиве элементы будут равны.

0
S
Sheriff
· 28.02.2010, 21:29

Кто может помочь нужна написать программку...

Цитата
составьте программу на языке программирования.
Заданы 3 числа а,б и с,если с-нечётное положительное число,то вывести на экран сумму чисел а и б,иначе произведение б и с!!!

0
M
MasterKamael
· 28.02.2010, 21:51

Лови

Код
program abc;
var
a,b,c: integer;
begin
writeln("Vvedite 4isla a,b,c");
readlb(a,b,c);
if (c>0) and ((c mod 2)=1)
then
writeln(a+b)
else
writeln(b*c);
readln();
end.

0
S
Sheriff
· 28.02.2010, 21:58

Благодарю )

0
S
slastik24
· 28.02.2010, 22:21

XTreme: 3-Очень спорно:)
а) if B = 0 the Writeln('Деление на нуль невозможно.'); //тут например B=0 неправильно,надо так B:=0


Какбе здесь все правильно, в данном случае.

0
S
Sheriff
· 28.02.2010, 22:22

MasterKamael: Лови

Вот так вот работает
Код
program abc;
var
a,b,c: integer;
begin
writeln('Vvedite 4isla a,b,c');
readln(a,b,c);
if (c>0) and ((c mod 2)=1)
then
writeln(a+b)
else
writeln(b*c);
readln;
end.

0
Лешик
Лешик

Пользователь

Бывалый

Постов: 116

На форуме с: 09.05.2007

Репутация: +185

Рейтинг: 0

· 28.02.2010, 22:25

sheriff , если нужны будут какие программы по паскалю, пиши сюда 804454 постараюсь помочь и что бы сразу не смущать никого БЕСПЛАТНО))))

— 5

0
S
Sheriff
· 28.02.2010, 22:40

DrSmart: sheriff , если нужны будут какие программы по паскалю, пиши сюда 804454 постараюсь помочь и что бы сразу не смущать никого БЕСПЛАТНО))))

Ок, буду знать :)

0
Войдите или зарегистрируйтесь чтобы ответить