Паскаль с нуля [ч14]. Многомерные (двумерные) массивы

В очередном видеоуроке по программированию на языке Паскаль, мы разберем такую тему, как "Многомерные массивы". Разбор темы будем проводить на примере двумерного массива, и рассмотрим такие моменты, как создание массива, наполнение его данными и вывод.

[@sopliviy_ezh]

Единственный нормальный канал с хорошим преподношением материала. И смотреть и слушать приятно.

[@ЛеонидКарнаух-ц2ю]

Есть ряд других, не менее интересных.

[@oleksandrkrasivskyi4916]

Можете кого то посоветовать?

[@mschannel1330]

Alex Giver, Хауди Хо

[@KrasavchikSelivan]

@@mschannel1330 только не хауди хо

[@zhanar2751]

Почему Вы перестали снимать видео? Из всего предложенного на ютубе, Ваши объяснения просто шикарны В вузе преподают паскаль, но совсем ничего не понятно Учусь благодаря Вам Возвращайтесь🙏🏻🙏🏻🙏🏻🙏🏻

[@kgeorge7153]

Очень повезло тем, у кого вы ведёте информатику, класс :) Уже и паскаль и Java прокачал довольно сильно, но начинал именно с этого канала, в общем спасибо за "толчок" в изучении, буду ждать материалов по HTML/CSS. Успехов :)

[@trutni5250]

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

[@ПавелСитников-т2м]

Я так рад, что ты возобновил свои видео. Спасибо тебе за твои познавательные видосы!

[@German707707]

+Павел Ситников (Fobos) А я то как рад)))

[@mx1xmx]

+Эдуард Мецкер сколько приблизительно видео будет по паскалю?

[@andrewwest9309]

когда новые видео ?

[@Categoria-m]

Самый лучший МЭН которого я ЗНАЮ))) ЭД КРАСАВА

[@ВикторНевечёра-щ7е]

Парень,откуда ты взялся.Просто спаситель

[@НИКИТАГНАТЮК-щ1ж]

Буду молиться, чтобы таких перерывов больше не было, Эд вы самый лучший как по мне преподаватель в таком формате, всё доходчиво и понятно, не забрасывайте нас по возможности на такое длительное время и удачи вам))))

[@epoxysmallkitchen6709]

Красавчик, преподавательская деятельность это твое. Ты очень круто подаёшь материал, доходчиво и понятно

[@maksimrugalov3158]

Пожалуйста, продолжайте снимать, просвещение это важно

[@andrewwest9309]

Спасибо , от души . Ваш канал супер !! Вот бы новые видео .

[@vanagau]

ЭД, ПРОДОЛЖАЙ, ДРУГ!

[@kondor7052]

Красава,всё кажется элементарным и понятным!Продолжай в том же духе )

[@ЗмейГорыныч-ю2у]

Классно все объяснили.Не прекращайте снимать обучающие видео.У вас блестяще получается !

[@oshekich5667]

Жду новых видео и разборов задач. Очень жаль что вы забросили канал,ведь как вы сами говорили,таких каналов и такого контента очень мало.Надеюсь вы будете помогать другим в освоении,как учитель.

[@Андрейщербаков-я6ъ]

От всей души благодарю за все ваши уроки!) Вы очень хорошо и доступно для любого человека объясняете! Желаю очень много подписчиков))

[@lim6501]

огромное спасибо, за этот урок я окончательно понял как работают массивы, осталось понять до конца как действует for, и for в for, ОГРОМНОЕ СПАСИБО ВАМ)!)

[@Kalendarist]

Наконец-то нормально объяснили! А то в школе так непонятно рассказывают, я думал, никогда не разберусь.

[@silencelol4390]

Очень хорошо объясняешь, жду продолжения обучения. Спасибо!

[@Romius915]

Круто) Ты прям обучаешь так как я себе всегда представлял! Казалось бы просто программирование, но эйфория от обучения просто зашкаливает! Так держать!)

[@toxaz7027]

эйфория ваще то

[@Romius915]

Спасибо! Буду теперь внимательней!)

[@lockd0wnll178]

Отличное видео. Выпускайте ролики по чаще, а то на ютубе мало таких годных видосов(

[@moondi5453]

Спасибо большое, лучшие курсы из всех, благодаря вам все поняла

[@Froz3enify]

У тебя дар к преподаванию! Правильно сделал, что пошел работать учителем!

[@tr4gger]

НАКОНЕЦ дождался, ждал ждал и вот те)))

[@Maslov_Viktor]

Большое спасибо за ваши видео уроки.

[@samtime1885]

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

[@tttggghhh2352]

Здравствуйте, очень полезные уроки. Большое вам спасибо. Продолжайте в том же духе=) Начинал с ваших уроках, сейчас уже пытаюсь написать свою первую игру. В школе на олимпиаде набрал 420 баллов из 500, благодаря вам. Вообщем спасибо большое =) И информатику подтянул.

[@valerabudnik2091]

Ура, новый видосик

[@кимкрутой-у3л]

Спасибо Вам огромное за ваши видео!! Всё разжёвано, в отличии от школьной программы!! Ещё раз спасибо

[@кимкрутой-у3л]

+ким крутой а если не секрет, то в какой школе вы преподаёте?

[@АнастасияФотоэффект]

Продолжайте снова снимать!!!хорошие видео

[@АртёмВасей-заработоквинтернете]

Сними пожалуйста курсы по другим языкам было бы очень полезно желаю удачи

[@ilya8302]

Отличное видео! Тем кто сдаёт информатику, будет полезно.

[@2Pacmeister]

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

[@lennylenny17]

Спасибо, очень качественные видеоуроки!

[@АлёшаКондратович]

Спасибо за обучение

[@Saprykevich]

Ура! Вы сняли выпуск. Спасибо)

[@chemicalex6429]

Предлагаю решить олимпиадную задачу по информатике: Есть n-значное число, где 2

[@СаняПантюхин-ч2ц]

Ура!!!!!!!!!!!!!!!!Ты вернулся!!! Яза это время стал самым успевающим по ИТ в классе!!! Но есть одна фишка,нужна помощь. Мб в группе с кем-нибудь свяжусь)

[@БогданШафранський]

Я благодаря Вам хорошо начал программировать на Pascal Turbo)) Жду уроков по CSS.)))))))) Спасибо большое за Ваш труд.

[@АндрейВладыкин-ж4й]

Етить, только посмотрел все твои видосики и тут бац, новое залил, красаучег, заливай почаще =)

[@ralli2498]

спасиб тебе

[@КириллЖуков-х2з]

У меня такая же мышка, как на видео!!! А за урок огромное СПАСИБО!!!

[@АлексейКрасавчик-щ1н]

Спасибо за видео!

[@niksor21]

Продолжай!!))

[@ПетрКушнирук-б7д]

Спасибо огромное!

[@randomvideo812]

Продолжай пожалуйста

[@antonbelsky6967]

Наконец то!!!)))

[@danielm3k]

Эдуард, здравствуйте вы еще не создали группу в ВК? Если создали скиньте ссылочку пожалуйста. А видео у вас просто шикарные, надеюсь вы не бросите это дело. СПАСИБО!!!

[@alfredschutz3677]

Спасибо!

[@АндрійРижук-к7п]

Спасибо за уроки вот результат урока program mnogmas; var mmas:array [1..2,1..4] of integer; begin mmas[1,1]:= 2; mmas[1,2]:= 4; mmas[1,3]:= 6; mmas[1,4]:= 8; mmas[2,1]:= 1; mmas[2,2]:= 3; mmas[2,3]:= 5; mmas[2,4]:= 7; for i:integer:=1 to 4 do write(mmas[1,i]:3); for i:integer:=1 to 4 do write(mmas[2,i]:3); end.

[@DestR_IGHT]

Прекрасно! Будут ли уроки по обучению в создании наипростейших игр на Паскале? Например крестики-нолики. Так как очень уж мало видео на ютубе где действительно объясняют. Хотелось бы узнать сами азы и принцип их создания. Спасибо)

[@Alan-ub8yc]

Не делай долгих перерывов)) Скоро уже экзамены, а видео полезны.

[@alexl2563]

Помогите пожалуйста!Структура элемента массива пассажир: фамилия, номер рейса, багаж - количество вещей, общий вес. Определить: ─ число пассажиров, количество вещей которых превосходит среднее число вещей; ─ пассажиров с заданным количеством вещей и не более заданного веса; ─ вывести информацию о количестве вещей и общем весе каждого рейса.

[@АУмнов]

Хотел спросить: будут ли продолжаться ваши уроки? И, если да, то хотелось бы сильнее углубиться в паскаль, к примеру ооп и т.д. Буду очень рад, если уроки продолжаться.

[@ТимурКремчеев]

Здраствуйте,можете объяснить что такое 'Function' и для чего это нужно?

[@sadlemon4110]

Здраствуйте, я сдаю Егэ по информатике, если вам не трудно могли бы вы порешать демо версии, особенно 2 часть, пожалуйста очень надо.☺

[@НикитаЛютенко]

Привет, Эдуард). я делаю свою мини-программу. и я очень хочу что-бы вы мне помогли. я введу диалог и потом задаю пример и тип integer нельзя привести к типу boolean. вот этот код: var a,b:integer; var n:string; begin a :=4; b :=3; write('Как тебя зовут?'); readln(n); writeln('Привет,' ,n, ' ,приятно познакомиться)'); writeln('Давай ' ,n, ' ,я задам тебе простейший пример?'); readln(); writeln('Нууу например 4+3? Ну что....'); readln(); if a+b then begin writeln('Молодец!'); end else begin writeln('Ты дурак'); end; end.

[@registerufo4718]

Nikita Lutenko Твой код должен выгядить вот так: var a,b:integer; n:string; begin a :=4; b :=3; write('Как тебя зовут?'); readln(n); writeln('Привет,' ,n, ' ,приятно познакомиться)'); writeln('Давай ' ,n, ' ,я задам тебе простейший пример?'); readln(); writeln('Нууу например 4+3? Ну что....'); readln(); if (a+b = 7) then begin writeln('Молодец!'); end else writeln('Ты дурак'); end. Твоя ошибка в строке "if (a+b) then", а надо "if (a+b = 7)then"

[@НикитаЛютенко]

Дима Дряблов спасибо огроменное

[@registerufo4718]

Nikita Lutenko Там неправильно, он будет в любом случае выводить {Молодец}. Надо вот такой код var a,b,i:integer; n:string; begin a :=4; b :=3; write('Как тебя зовут?'); readln(n); writeln('Привет,' ,n, ' ,приятно познакомиться)'); writeln('Давай ' ,n, ' ,я задам тебе простейший пример?'); readln(); writeln('Нууу например 4+3? Ну что....'); readln(i); if (a+b=i) then begin writeln('Молодец!'); end else writeln('Ты дурак'); end. Там ошибка в строке readln (), а надо readln (i)

[@НикитаЛютенко]

спасибо, снов таки огроменное

[@mx1xmx]

ураааааа!!!

[@Saprykevich]

Из вас отличный учитель получится)

[@АлександрПетров-э8с6н]

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

[@ДианаБакиева-э4в]

Эдуард здравствуйте, дайте пожалуйста пару видео по олимпиадным задачам.

[@bornfromdark3898]

Вернись,мужик,умоляю.Разбери как заполнять двумерные массивы змейкой и улиткой...

[@b4ton4EG]

по голосу я раньше думал, что ему не меньше 40 лет

[@ИванБудько-д8х]

Здравствуйте, Эдуард. Скажите, собираетесь ли вы снимать видео уроки по Web-программированию? И если да, то когда ждать выпусков?

[@kikisedi3000]

Здесь все несколько сложней, но довольно тоже просто

[@UranUrshok]

Приветствую тебя, Эдуард, ты можешь показать как найти точку на плоскости?

[@ГлебХойто]

ПОмогите решить пожалуйста очень надо. 1. Известны данные о стоимости каждой из 10 моделей легковых автомобилей и 10 моделей грузовых автомобилей. Найдите среднюю стоимости легковых и грузовых автомобилей. 2. Известна информация о 20 учениках класса: ФИО, даты рождения. Определить, есть ли в классе ученики, у которых сегодня день рождения, и если да, то вывести фамилию каждого

[@registerufo4718]

1.- const N = 10; var mmas: array [1..2,1..N] of integer; summ1,summ2,d:integer; a: real; begin summ1:=0; summ2:=0; {Задаем, значение переменных (в данном случае они рандомны, но можно и с помощью ввода)}; for d:= 1 to N do begin mmas [1,d]:= random (99999); mmas [2,d]:= random (99999); end; for d:=1 to N do begin summ1:= summ1+mmas[1,d]; summ2:= summ2+mmas[2,d]; end; a:=(summ1+summ2)/20; writeln (a); end. 2.- В процессе

[@АндрейВасильевич-ь4ц]

Эдуард, а где можно применить знания на практике, а имено что и как написать?

[@Sovietwave302]

я теперь буду у препода по информатике 5 за год просить)

[@xorsas]

Можно спросить?Из курса 9 класса можно ли в операторе repeat использовать оператор while?Пока условие истина?

[@vadim2000ta]

ура

[@БлэтЛотус]

#ЭдЖиви

[@Пятница-ю7ц]

когда начнется курс по веб программированию?

[@mrcoder17]

Эдуард, в интро присутствуют надписи "Веб-дизайн" HTML и СSS А вы будете обучения делать по этим языкам или вас интересует теперь только прибыль от партнёрки?

[@imantwot]

Эдуард, на каких площадках можно найти реальных спрос на создание сайтов? А то студенту хочется, что-то делать полезное и приятное. Заранее спасибо за информацию😊

[@Chugunski]

здравствуйте , не хотите ли вы сделать видео по программе эксель для оге 9 кл? (я думаю просмотров неплохо наберет)

[@YesMyFriend1337]

Попытался сделать сортировку, как по мне получилось не слишком рационально, можете показать как было бы лучше? const N=3; var mmas:array [1..N,1..N] of integer; i, j,r,e:integer; begin mmas[1,1]:=3; mmas[1,2]:=10; mmas[1,3]:=5; mmas[2,1]:=2; mmas[2,2]:=21; mmas[2,3]:=9; mmas[3,1]:=24; mmas[3,2]:=11; mmas[3,3]:=1; For i:=1 to N do For j:=1 to N do write(mmas[i,j], ', '); For e:=1 to N-1 do For i:=1 to N do For j:=1 to N-1 do if (mmas[i,j]>mmas[i,j+1]) then begin R:=mmas[i,j]; mmas[i,j]:=mmas[i,j+1]; mmas[i,j+1]:=R; end; Writeln; For i:=1 to N do For j:=1 to N do writeln('Сортировка: ', mmas[i,j], ', '); end.

[@jamesarkon5836]

Как в процедуру двухменрный массив запхнуть?

[@ilya8302]

👍👍👍

[@Helena-j1w]

Помогите составить код в Делфи 7 . Расчитать цены товаров в другой валюте, если задан её курс относительно гривны. Изучаем одномерные массивы.

[@ДмитрийОпенков]

Здравствуйте. Поясните, пожалуйста как двумерный массив в паскале можно поместить в одномерный? Далее то, что получилось надо обработать сортировкой

[@victorcoi110]

Эдуард,скажите за сколько примерно ваших выпусков можно рассказать о всех школьных знаниях в школе?

[@victorcoi110]

О всех знаниях по информатике конечно...........

[@Егор-п2м6ц]

сделай плз видео по теме множество (там set of char и все такое)

[@SeverPolus]

Я *слушаю ролик, не особо понимаю*. Тоже я: что? Портал в Казахстане? Так и знал

[@MrRiseful]

А в паскале можно массив в массив засунуть?))) (Я JavaScrip'ер)

[@xpohhokc2389]

зубки супер

[@TheSkr4p]

Здравствуйте, посоветуйте хорошие книги , в которых проще выучить паскаль. P.s. Или лучше сразу языки посерьезнее?

[@romas6676]

Скажите, пожалуйста, как писать код в Python, чтобы был результат 2 * 1 = 2 2 * 2 = 4 2 * 3 = 6 2 * 4 = 8 2 * 5 = 10 2 * 6 = 12

[@rodkok0220]

Через цикл + массив Mas : array [1..6] of integer; ..... For i:=1 to n do b :=2 *a [i] Writeln ('2*', '', a[i], '=', b)

[@АУмнов]

Помогите, пожалуйста, надо написать программу, которая определяет является ли число простым

[@АраратАрарат-г1л]

Ждал как Хатико

[@absolute777]

Помогите решить задачу по паскалю (Pascal),задание такое "Найти сумму третьего столбца в двумерном массиве"

[@МахачАбдулазизов-ш8т]

Здравствуйте, нужны ли огромные знания по математике чтобы изучать программирование ?

[@SeregaFilippov]

А как сделать массивы рандомными? У меня вот задание: есть 5 курсов и 8 групп в каком-то колледже. Нам нужно найти количество студентов именно третьего курса.

[@ЛеонидКарнаух-ц2ю]

Из Вашего задания неясно, зачем массив рандомным делать. И не ясно, как данные хранятся. program Project2; {$APPTYPE CONSOLE} uses //обратите внимание, что для использования функций Randomize и //RandomRange надо подключить библиотеку Math SysUtils, Math; var //пусть массив двумерный arr: array [1..3, 1..3] of integer; i, j: integer; begin //каждый раз случайные числа будут разные Randomize; for i := 1 to 3 do begin for j := 1 to 3 do begin //функция RandomRange вернет случайное число в указанном // диапазоне. В данном случае от 10 до 99 включительно arr[i,j] := RandomRange(10,99); write( arr[i,j], ' ' ); end; writeln; end; readln; end.

[@sailar_3422]

Что с каналом?))

[@makskirieshka5124]

Program Загадки; var name:string; q:string; w:string; begin writeln('Привет, меня зовут LookDasr, я из далекой страны "Интернет",а как зовут тебя? ');readln(name); write(name,' ты хочешь поиграть ?'); readln(q); begin if q='да' then writeln(name, ' Давай так, я буду загадывать тебе загадки, а за каждую отгадыную загадку у тебя будет 1 бал'); end; writeln('Если ты согласен напиши да'); readln(q); begin if q='да' then writeln('поехали'); writeln('Зимой и летом, одним цветом (1-Дуб, 2-Елка, 3-Шкаф) ');readln(w); if w='2' then writeln(name, ' Ты заработал +1 бал, молодец у тебя 1 бал') else writeln(name,' Ты проиграл 0 балов'); end; writeln('Для продолжения ввидите ок, для ухода из игры ввидите оф');readln(q); begin if q='ок' then writeln('поехали'); writeln(' Висит на стене и воняет? (1-Часы, 2-Старушка, 3-Носок) ');readln(w); if w='1' then writeln(name, ' Ты заработал +1 бал, молодец у тебя 2 бала') else writeln(name,' Ты проиграл 1 бал'); end; writeln('Для продолжения ввидите ок, для ухода из игры ввидите оф');readln(q); begin if q='ок' then writeln('поехали'); writeln(' Маленькая собачка свернувшись висит, не лает не кусает, а в дом не впускает? (1-Фил, 2-Ели, 3-Замок) ');readln(w); if w='3' then writeln(name, ' Ты заработал +1 бал, молодец у тебя 3 бал') else writeln(name,' Ты проиграл 2 бала'); end; writeln('Для продолжения ввидите ок, для ухода из игры ввидите оф');readln(q); begin if q='ок' then writeln('поехали'); writeln('Два конца, два кольца,Посредине гвоздик. (1-Ножницы, 2-Домик, 3-Молоток) ');readln(w); if w='1' then writeln(name, ' Ты заработал +1 бал, молодец у тебя 4 бал') else writeln(name,' Ты проиграл 3 бала'); end; writeln('Для продолжения ввидите ок, для ухода из игры ввидите оф');readln(q); begin if q='ок' then writeln('поехали'); writeln('Течет-течет - Не вытечет, Бежит-бежит - Не выбежит (1-Лужа, 2-Школьник, 3-Речка) ');readln(w); if w='3' then writeln(name, ' Ты заработал +1 бал, молодец у тебя 5 балов') else writeln(name,' Ты проиграл 4 бала'); end; writeln('Для продолжения ввидите ок, для ухода из игры ввидите оф');readln(q); begin if q='ок' then writeln('поехали'); writeln('Красна девица Сидит в темнице, А коса на улице. (1-Лук, 2-Арбуз, 3-Морковь) ');readln(w); if w='3' then writeln(name, ' Ты заработал +1 бал, молодец у тебя 6 балов') else writeln(name,' Ты проиграл 6 балов'); end; writeln(name, ' Ух...Как ты это делаешь? Хочешь сыграть в супер игру? Я загадываю тебе 3 загадки, за каждую правильно отгадыную загадку ты получаешь +3 бала, но при ошибки ты теряешь все свои балы (1-играю 2-ухожу)'); readln(w); writeln('Для продолжения ввидите ок, для ухода из игры ввидите оф');readln(q); if q='ок' then writeln('поехали'); writeln(' Ах, не трогайте меня. Обожгу и без огня! (1-Огонь, 2-,Нож 3-Крапива) ');readln(w); if w='3' then writeln(name, ' Ты заработал +3 бала, молодец у тебя 9 балов') else writeln(name,' Ты проиграл 0 балов'); writeln('Для продолжения ввидите ок');readln(q); if q='ок' then writeln('поехали'); writeln(' Маленький рост, длинный хвост, Серая шубка, острые зубки. (1-,Тигр 2-,Мышка 3-Медведь ) ');readln(w); if w='2' then writeln(name, ' Ты заработал +3 бала, молодец у тебя 12 балов') else writeln(name,' Ты проиграл0 балов'); writeln('Для продолжения ввидите ок');readln(q); if q='ок' then writeln('поехали'); writeln(' Рогатый, а не бодается. (1-Бык, 2-Месяц,3-Слон ) ');readln(w); if w='2' then writeln(name, ' Молодец у тябя 15 балов и на этом наша игра заканиваеться') else writeln(name,' Ты проиграл 0 балов'); writeln(name,' мне понравилась твоя игра) мы дарим тебе еще 5 бала)'); end. // 2 день учусь на твоих видео, в информатеке был полный ноль( на счет програмирования, а оказалось это интересно и прикольно, учитель удивился когда я ему скинул программа эту, большое тебе спасибо)

[@Диасембергенов-ъ4я]

где видосы

[@ЗахарФеренс]

Вы не клипаете? Каменные глаза

[@FIRE-ui6ii]

Что с каналом?

[@Артур-с1х]

Мецкер в 2016!!! :РР

[@abdenal-247]

А если массив 64х32 элемента?

[@Хорошнякпацан-у3ш]

Когда новые видео??