Все
pascal

2. информация о количестве жильцов в каждой из четырех квартир каждого этажа 12-
этажного дома хранится в двумерном массиве (в первой строке — информация о
квартирах первого этажа, во второй — второго и т. определить:
а) на каком этаже проживает меньше всего людей;
б) на каком этаже проживает больше всего людей.
обе решить двумя с использованием дополнительного одномерного массива;
2) без использования дополнительного одномерного массива.

3. в поезде 18 вагонов, в каждом по 36 мест. информация о проданных на поезд билетах
хранится в двумерном массиве, номера строк которого соответствуют номерам вагонов,
а номера столбцов — номерам мест. если билет на то или иное место продан, то
соответствующий элемент массива имеет значение 1, в противном случае — 0.
составить программу, определяющую, имеются ли свободные места в том или ином
вагоне поезда.

4. дан двумерный массив целых чисел. сформировать одномерный массив, каждый
элемент которого равен наибольшему по модулю элементу соответствующего столбца
двумерного массива.

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

satova1

22.04.2023 22:33

Лайков нету коментариев нету подпишика нету эх пойду погуглю...

arianadorofeva

13.12.2020 17:44

ИНФОРМАТИКА Почему математическая модель наименьше точнее,а физическая модель наибольшее точнее и их сферы применения...

Ирма69

28.04.2021 18:37

Эта задача с открытыми тестами. Ее решением является набор ответов, а не программа на языке программирования. Тесты указаны в самом условии, от вас требуется лишь ввести ответы на...

anayaremenco

24.06.2020 22:36

Относительность времени (тест 2) Эта задача с открытыми тестами. Ее решением является набор ответов, а не программа на языке программирования. Тесты указаны в самом условии, от вас...

СашаСтоляров1

11.06.2022 23:30

Составить таблицы истинности для следующих логических выражений ...

5473894

29.04.2023 13:53

Знайти суму всіх цілих чисел від 100 до 300 Python...

kilaur

30.06.2021 05:55

Каким из приведенных ниже газов следует наполнить шарик с практически невесомой оболочкой, чтобы он имел плотность, близкую к плотности воздуха, и мог парить в нем, не взлетая резко...

SaneckTupit

15.04.2023 08:07

Найди группу слов, в которой записаны только однокоренные слова. Выдели эту группу 1) бег, бегун, побежал2) маленькое, маленький, маленькая3) смешинка, смешно, смешать...

Pandochka7771

15.04.2023 08:07

Найдите стороны прямоугольональ которого равна 20 см ника диаги образует с одной из сторон угол 25°...

чек14

08.11.2020 07:36

9. цветов принесли 60 л водывечером принеслитаких же вёдрах. Сколько ведерПридумай еще один вопрос к условию задачи,Утром для полива10 одинаковых вёдрах, а36 л воды вводы принесли...

Ответ:

sopyryaeva1976

03.12.2021 08:40

Var N:Array[1..20] of integer; i,j,q,k,max:integer;begin Randomize;writeln('массив');for i:=1 to 20 do beginN[i]:= random(100)-50;write(N[i]:4);end;writeln;i:=0;writeln('Измененый массив');While j<20 do beginj:= j + 2; k := N[j-1];N[j-1]:=N[j]; N[j]:= k;end;foreach q in N do beginwrite(q :4);end;end.
var N,M:Array[1..20] of integer; i,j,min,q,k,max:integer;begin Randomize;max:=-200; min:=200;writeln('1 массив');for i:=1 to 20 do beginN[i]:= random(100)-50;write(N[i]:4);if ((N[i]>0 )and(N[i] mod 2 = 0))then beginif max < N[i] then max := N[i];if min > N[i] then min := N[i];j:= j + 1;M[j]:=N[i];end;end;writeln;writeln('2 массив');foreach k in M do beginwrite(k:4);end;writeln;if (max = -200) or (min = 200) then write ('нет чётных положительных элементов')else beginwrite('max = ' ,max:4);write(' min = ' ,min:4);end;end.
1) заполните массив случайными числами и переставьте соседние элементы, поменяв 1-ый элемент со 2-м,

1) заполните массив случайными числами и переставьте соседние элементы, поменяв 1-ый элемент со 2-м,

0,0(0 оценок)

Ответ:

medewwnik

05.09.2022 02:19

Я не знаком особо с паскалем, но могу направить на путь истинный :b
Кароче..
Подсчет количества:
если билет счастливый count++;
(все логично)
Но как определить счастливый ли билет:
Припустим у нас номер билета лежит в массиве: ticket, то
if ((strval(ticket[0]) + strval(ticket[1] + strval(ticket[2])) == (strval(ticket[3]) + strval(ticket[4]) + strval(ticket[5])))
count++;

strval - преобразовнаие из строки в число. string --> integer
Если синтаксис знаешь, то напишешь прогу, если нет.. то жди ответа других.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку