Паскаль с Нуля. Переменные, Оператор присваивания, Оператор ввода. Урок 2

ПОЛНАЯ ВЕРСИЯ КУРСА по Pascal с проверкой ДЗ на Stepik - stepik.org/110164
В данном курсе можно проверить свои знания на практике. Ваши задачи будут проверяться системой.
Скачать Pascal ABC.NET - disk.yandex.ru/d/JMUY5HbfxMfdiw
Онлайн Компилятор № 1 - rextester.com/l/pascal
Онлайн Компилятор № 2 - www.onlinegdb.com/online_pasc...
00:00 Понятие "Переменная"
03:16 Имена переменных
07:33 Типы переменный
12:22 Объявление переменных
15:17 Оператор присваивания
20:19 Пример задачи с оператором присваивания
23:44 Оператор ввода
28:05 Составной оператор ввода
29:51 Пример задачи с составным оператором вывода
37:03 Решение задач A, B, C
48:49 Домашнее задание
Данный курс посвящён изучению языка программирования Pascal. Во время уроков мы с нуля изучим все основы программирования и основные операторы. Курс подойдёт школьникам которые только начинают изучать программирование.
В ходе данного курса будет как теория - так и практика, где мы прорешаем несколько задач по каждой из тем. Кроме этого в конце каждого урока будет небольшое Домашнее задание для закрепления материала
Урок 2 посвящён разбору понятия "переменная", а так же разбору оператора присваивания и оператора ввода

[@mihal3546]

Program spasibo; Begin Write('Спасибо огромное, объясняешь приятно, и понятно, желаю успехов!'); End.

[@prostieresheniya]

Это самый лучший тематический комментарий)))

[@mihal3546]

@@prostieresheniya Спасибо!

[@kleorespecta]

";" перед "End." можно не ставить.

[@user-dt4ub4po3m]

в школе нам паскаль криво косо объяснили .а здесь все понятно и даже появился какой то интерес к яп

[@prostieresheniya]

Спасибо большое за отзыв ☺ Смотрите с VPN чтобы поддержать канал 🙏

[@user-fj9ed2ny4t]

В школе объясняли сложно и непонятно. Вы же смогли смогли это сделать в разы лучше, да и за меньшее время. Большое спасибо!!!

[@prostieresheniya]

Спасибо большое за отзыв ☺ Смотрите с VPN чтобы поддержать канал 🙏

[@krasnolikiy]

У тебя самые простые гайды по Паскалю на Ютубе, респект👍

[@prostieresheniya]

Спасибо большое за отзыв) очень приятно получать такие комментарии) Жду Вас ещё на новых уроках)

[@user-lv7yt8vo7i]

Спасибо большое!!! В школе толком эти темы не изучали, а тут все Супер!! 🌹

[@prostieresheniya]

Спасибо за комментарий 😉Смотрите видео с VPN чтобы поддержать канал 🙏

[@White_Rose_with_thorns]

Это то, что я искала! Просто, понятно и подробно! Спасибо огромное!

[@prostieresheniya]

Спасибо большое))) очень приятно читать такие комментарии)

[@Qur1osity]

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

[@prostieresheniya]

Спасибо за отзыв)

[@prostieresheniya]

Если что есть дешевый курс с проверкой дз и большим количеством заданий

[@dianadiana2157]

Благодарю, информативно, доступно!!😍

[@iGor_official.]

Спасибо вам огромное за ваши видеоуроки! Мне 14 лет, внезапно очень заинтересовала вся эта тема программирования и IT вцелом. Посчитал что Pascal вместе с Delphi отлично подойдут для ознакомления с программированием, как миниммум потому, что его изучают в школах. Я надеюсь, что если всё сложиться как по маслу, я буду вам безгранично благодарен, за данный "буст" в начале!

[@prostieresheniya]

Спасибо большое за отзыв ☺ Смотрите с VPN чтобы поддержать канал 🙏

[@Happy-zk7tk]

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

[@prostieresheniya]

@@Happy-zk7tk Полностью согласен)

[@zaka3048]

Не советую учить паскаль он не востребован, точнее его не кто не учит

[@Happy-zk7tk]

@@zaka3048 хех, вот о таких людях я писал)

[@itsodiiii4688]

Спасибо огромное за такое внятное объяснение!!

[@prostieresheniya]

Спасибо за отзыв очень приятно))))

[@risteril]

Огромное спасибо вам! Всё просто и понятно

[@user-vu6sn8pe1y]

большое спасибо я ни как не понимала информатику и вы были моим спасением

[@user-yn9ms3qq7m]

спасибо большое, самое лучшее, что я видела по этой теме

[@prostieresheniya]

Спасибо большое за отзыв 🙏 очень рад что удаётся кому-то помогать и кому-то нравятся мои видеоуроки) ещё раз спасибо и приходите ещё на канал) например учить Python ))

[@user__33305]

Благодаря выбрался из ямы непонимания и отчаяния. Спасибо большое!

[@prostieresheniya]

Спасибо большое за отзыв) Рад был Вам помочь))

[@Dostoevskij1]

Очень круто, благодарю

[@prostieresheniya]

Спасибо большое за отзыв))

[@endisouljah]

program rear; var a,b,c,d, sum:integer; begin writeln('Введите кол-во булок хлеба:'); read(a); writeln('Введите цену одной булки хлеба:'); read(b); writeln('Введите кол-во бутылок молока:'); read(c); writeln('Введите цену одной бутылки молока:'); read(d); sum:=a*b+c*d; writeln('За ', a, 'б хлеба и ', c, 'б молока вы заплатите ', sum, ' руб') end.

[@YouTubeYouTube-ft2yt]

program dz2; var q,a,z,w,h,m,o:integer; begin writeln('Введите количество булок хлеба: '); writeln('Введите цену одной булки хлеба: '); writeln('Введите количество бутылок молока: '); writeln('Введите цену одной бутылки молока: '); read(q,a,z,w); h:=q*a; m:=z*w; o:=h+m; write('За '); write(q); write('булок хлеба и '); write(z); write('бутылки молока вы заплатите '); write(o); write('рублей.'); end. Введите количество булок хлеба: В�едите цену одной булки хлеба: Введите количество б�тылок молока: Введите цену одной бутылки молока: 4 30 2 60 За 4булок хлеба и 2бутылки молока вы заплатите 240рублей. ...Program finished with exit code 0 Press ENTER to exit console. У меня так, но всё равно ответ тот же

[@user-nv8yv1sm9h]

@@KZbinKZbin-ft2yt var amountOfMilk,amountOfBread, totalAmount:integer; priceMilk:=60; priceBread := 30; begin write ('Введите кол-во пакетов молока и буханок хлеба: '); read(amountOfMilk, amountOfBread); totalAmount:= (priceMilk * amountOfMilk) + (priceBread * amountOfBread); write ('За ', amountOfMilk,' пакета молока и ', amountOfBread,' буханки хлеба вы заплатите: ', totalAmount, ' руб.'); end.

[@zoyewww5957]

@@user-nv8yv1sm9h program learnqq; var bread, costbread, bottle, costbottle: integer; begin writeln('Введите количество булок и стоимость 1 буки хлеба'); read(bread, costbread); writeln('Введите количество бутылок молока и цену за 1 бутылку'); read(bottle, costbottle); write('За ', bread, 'б. хлеба и ', bottle, 'б. молока вы заплатите ', costbread*bread+costbottle*bottle, 'руб'); end.

[@dimka5405]

СПАСИБО БОЛЬШОЕ!

[@prostieresheniya]

Спасибо)

[@johntubeG]

Спасибо вам огромное за это бесплатный урок, у меня через 4дня олимпиада(по python и pascal),и этот урок будет полезным)

[@prostieresheniya]

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

[@user-vn2vw3ol4b]

Спасибо ! Супер !

[@prostieresheniya]

Спасибо за поддержку)

[@user-ou3yq5sm1q]

Твои видео самые понятные по праграмированию на Pascal.

[@prostieresheniya]

Спасибо большое! Очень приятно читать такие комментарии))

[@aleksandrshidlovsky4329]

Спасибо Вам.

[@prostieresheniya]

Вам спасибо что смотрите)

[@user-jl7wo5un5b]

огромное спасибо вы крутой учитель

[@prostieresheniya]

Спасибо большое за отзыв))

[@user-ju9pq5lt9i]

Спасибо вам большое❤

[@prostieresheniya]

Спасибо большое за отзыв ☺ Смотрите с VPN чтобы поддержать канал 🙏

[@Andrey2But]

интересно и очень понятно😀😀😀

[@prostieresheniya]

Спасибо большое за отзыв ☺ Смотрите с VPN чтобы поддержать канал 🙏

[@sasha_klmn]

очень круто 💞

[@prostieresheniya]

Спасибо большое за отзыв 😀

[@user-qh7zr4pi6v]

круто

[@prostieresheniya]

Спасибо)

[@Alexey_88]

Спасибо большое! Доходчиво объясняете! Вы пропустили в последнем примере в описание формулы деление на 3. 48:14 где курсором выделено. Если конечно я всё правильно усвоил, если я ошибаюсь, то прошу прощения.

[@prostieresheniya]

Спасибо большое за отзыв) да, вы правильно всё поняли и нашли ошибку) Если интересно курс с проверкой домашки и другими заданиями на понимание есть в ссылке в описании. Стоит 499 рублей

[@sorincapatina4101]

У вас там ошибка в задаче C Нужно чтобы было (4+5+7)/3=5,333333333 А у вас (4+5+7)/=5,333333333 У вас после / сразу же = а нужно чтобы было /3 потом =

[@user-xi8xm3zu4y]

а что насчёт этого? нужно написать алгоритм вычисления у по формуле у=х-14. как это?

[@nikimiller3190]

Получилось дз сделать ^^ Ура

[@prostieresheniya]

Два урока за день прошёл? Вот это обороты) если учесть что второй ролик часовой)))

[@nikimiller3190]

@@prostieresheniya просто первый был лёгкий, повторение, а если первый урок лёгкий и итак понятный, можно я считаю и к следующему перейти. А время меня не пугает

[@prostieresheniya]

@@nikimiller3190 Круто! Успехов Вам в изучении программирования)

[@romandada9733]

а такое задание програма решает? есть у вас пример как вносить данные? При каких значениях параметра с функция у=2х^3-6х возрастает на отрезке [2c-6; 4с+4}

[@user-qo8xk6tt8o]

Спасибо за видео, все очень понятно про питон будет?

[@prostieresheniya]

Про питон есть))

[@thdnka]

Топ

[@prostieresheniya]

Спасибо за отзыв)

[@NikitkaSnusik]

ты говоришь что надо объявить переменные до begin но у меня и после работает и ошибки не выдает.

[@romperstomper7703]

Где правильно, а где нет? Подскажите пожалуйста, очень нужно var &var: BigInteger; var a, b, c7: real; var Угол наклона: integer; var year: reel; var x19: integer; var МалыйРадиус: real; var a_1: int64;

[@bobykharoshikov-7796]

Второе

[@user-ob9wl8ip8e]

Здравствуйте. Как сделать так, чтобы при вводе чисел, для них сразу выводилось в столбик умножение, деление, добавление, отнимание Вот допустим вводим 1,2 ,3 1+2+3= 1*2*3= 1/2/3= 1-2-3=

[@prostieresheniya]

Добрый день! Посмотрите внимательно задачу C в этом уроке, там как раз всё в столбик и практически тоже самое

[@user-nv8yv1sm9h]

Прошу прощения, а такой вариант не валиден? program summa; var a,b,c,sum :integer; begin write('Введите три числа: '); read(a,b,c); sum:= a+b+c; writeln (a, ' + ', b, ' + ', c, ' = ', sum); begin sum:= a*b*c; write (a, ' * ', b, ' * ', c, ' = ', sum); end; end. Эта задача под пунктом "B" И если нет, то почему? Спасибо!

[@prostieresheniya]

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

[@kristaviang4270]

write('спасибо');

[@user-nr5oc5qj3z]

Добрый день! при высчитывании со скобками например а-(и+с) выдает результат 4-(9,+,1) как избавиться от запятых в скобках?

[@user-nr5oc5qj3z]

если целое число изначально идет (и+с)

[@prostieresheniya]

Если честно я не понял вопроса немного. У вас печатается с запятыми? Или вычисляется как то неправильно ?

[@user-nr5oc5qj3z]

@@prostieresheniya var z,g,c,r,o:real;

[@user-nr5oc5qj3z]

@@prostieresheniya read (c, g); read (z); r:=z-(g+c); writeln (z, '-',(g,'+', c),'=', r); вводим три числа 5 6 7 получаем результат 7-(6,+,5)=-4 появляются запятые в скобках

[@user-nr5oc5qj3z]

не получается написать в столбик, написал встрочку

[@maqpun]

дз сделано. Я прям потел, но в итоге сделал все за 5 минут

[@prostieresheniya]

Это хорошо)) вообще можно проверять свои ДЗ на степике, ссылка в описании))

[@maqpun]

@@prostieresheniya, у меня вопрос. А после Паскаля сложно будет перейти на питон? Я сейчас учу Pascal для сдачи ЕГЭ, а потом для общего развития хочу учить Пайтон

[@prostieresheniya]

@@maqpun Как практикующий учитель советую сразу и сейчас переходить на питон, и это будет не сложно, и для ЕГЭ питон вам во многом пригодится, и многие вещи будут решаться быстрее и легче

[@maqpun]

@@prostieresheniya, спасибо, я вас понял

[@prostieresheniya]

@@maqpun Желаю Вам удачи в освоении программирования)

[@user-ij6fh4xg5o]

дз: program bulka; var a,b,c,d,z: integer; begin writeln('Введите кол-во булок хлеба:'); read (a); writeln('Введите цену одной булки хлеба:'); read (b); writeln(Newline,'Введите кол-во бутылок молока:'); read (c); writeln('Введите цену одной бутылки молока:'); read (d); z := a*b+c*d; writeln(Newline,'За ', a,'б хлеба и ',c,'б молока вы заплатите ',z,' руб.'); end.

[@Loty1]

program honor; var a,b,c,d,sum :integer; begin writeln('введите кол-во булок хлеба'); read(a); writeln('введите цену одной булки хлеба'); read(b); writeln('введите кол-во бутылок молока'); read(c); writeln('введите цену одной бутылки молока'); read(d); sum:=a*b+c*d; writeln('за ',a,'б хлеба и ',c,'б молока вы заплатите ',sum,' руб.') end.

[@prostieresheniya]

Спасибо большое за отзыв ☺ Смотрите с VPN чтобы поддержать канал 🙏

[@Qdysseus]

Я не понял только почему нельзя сразу динамическим данным нельзя было. Недавно узнал об этом и сижу со 100%+ здоровьем кода

[@prostieresheniya]

Ну вот так было придумано) Потом поняли что неудобно

[@gregormendel272]

45:15 троечку забыл

[@prostieresheniya]

Бывает)))

[@neonso2693]

Странно, пишу sum:=a*b+c*d; А по итогу пишет что все стоит 0 руб

[@prostieresheniya]

Вообще нужно смотреть. Но скорее всего вы выводите раньше чем задали эти переменные. Либо выводите не ту переменную в которую считаете

[@yang1487]

у меня вопрос как мне это поможет ,если по факту ты просто сидишь и списываешь то что написали вы,а объяснения для чего мы написали ту или иную команду не ясно

[@vivtherev]

4:19 можете объяснить, я не понимаю

[@mixon3741]

очень долго и очень понятно:)

[@prostieresheniya]

Спасибо большое за отзыв ☺ Смотрите с VPN чтобы поддержать канал 🙏

[@mixon3741]

@@prostieresheniya хорошо, в следующий раз включу

[@prostieresheniya]

@@mixon3741Спасибо Вам огромное)

[@bekaakramov2759]

кстати. у меня получилось такой код домашнего задания. Program Education1; var thingsBread, piceBread, thingMilk, priceMilk,totalCost,sumBread,sumMilk: integer; begin writeln('Введите количество булок хлеба: '); read(thingsBread); writeln('Введите цену одной булки хлеба: '); read(piceBread); writeln('Введите количество бутылок молока: '); read(thingMilk); writeln('Введите цену одной бутылки молока: '); read(priceMilk); sumBread := thingsBread * piceBread; sumMilk := thingMilk * priceMilk; totalCost:= sumMilk + sumBread; writeln ('за ',thingsBread,'б хлеба и ',thingMilk,'б молока вы заплатите ',totalCost,'руб.' ); end.

[@prostieresheniya]

👍👍👍👍

[@geraarzazavr]

пожалуйста тайм коды((((

[@karpit4]

абсоллютно согласен!!

[@akhsarchik5085]

Учу Паскаль с нуля день 1 видео 2

[@prostieresheniya]

Интересно что из этого получиться)) Смотрите с VPN чтобы поддержать канал 🙏

[@LOVE_RQ]

извините, а почему у меня после ,Введите три числа, стоит 4, а не под этим

[@prostieresheniya]

возможно ln не поставили

[@IMdontwoman]

Ощибка в c ты там забыл дописать что надо на 3 поделить еще

[@user-jq6pm1ej7g]

Даже

[@_sophia_my_]

program homei; var a,b,c,d,k,l,j:integer; begin a:=4; b:=30; c:=2; d:=60; k:=a*b; l:=c*d; j:=k+l; writeln('Введите кол-во булок хлеба: '); writeln(a); writeln('Введите цену одной булки: '); writeln(b); writeln('Введите кол-во бутылок молока: '); writeln(c); writeln('Введите цену одной бутылки молока: '); writeln(d); write('За 4б хлеба и 2б молока вы заплатите 240 руб'); end.

[@neonso2693]

А в конце ошибка, не написал тройку как текст)

[@prostieresheniya]

Надо пересматривать) но возможно конечно)

[@neonso2693]

@@prostieresheniya 47:07 Смотрите, вы написали /=, а тройку забыли

[@neonso2693]

Ну это глупая придирка, так что извиняйте)

[@prostieresheniya]

Да и правда забыл))))

[@DanPex13]

7 строка неизвестное имя p

[@prostieresheniya]

Вы не объявили данную переменную в var

[@gosha_naruto5462]

Всë понятно но воды 70%

[@yasyaatomas2373]

дак это же для начинающих, чтобы не быстро и вспешке объяснить, а чтобы все поняли. по крайней мере мне подходит такой формат "разжёвывания" и примеры с коробочками. если человеку много раз что-то повторять и все раскладывать медленно, не спеша по полочкам, то он всё сможет понять

[@gregormendel272]

47:36 Почему исполнитель программы перешёл на следующую строку, если там "read", а не "readln"?🤔

[@prostieresheniya]

Это особенность Паскаль ABC видимо. Действительно при вводе он всегда переходит на следующую строку

[@Y.T.G_Brawl]

У меня вопрос что не правильно в этой программе ? program ar; var a,b,c,d,v:integer; begin writeln('Введите кол-во булок хлба:'); read(a) writeln('Введите цену одной булки хлеба:'); read(b) writeln('Введите кол-во бутылок молока:'); read(c) writeln('Введите цену одной бутылrb молока:'); read(d) v:=a*b+c*d; writeln('За', a,'б хлеба и ', c, 'б молока вы заплатите', v, 'рублей'); end. Это домашка)

[@prostieresheniya]

А почему вы после read() нигде не ставите ;

[@Y.T.G_Brawl]

@@prostieresheniya СПАСИБО!!!

[@prostieresheniya]

@@Y.T.G_Brawl Пожалуйста) Вообще смотрите ошибки вам красным подчёркивает и внизу пишет в чём ошибка

[@Chooyka]

program t1; var a,b,c,d,sum,pr1,pr2:integer; begin Write('Введите количество булок хлеба: '); read(a); Write('Введите цену одной булок хлеба: '); read(b); Write('Введите количество бутылок молока: '); read(c); Write('Введите цену одной бутылки молока: '); read(d); pr1:=a*b; pr2:=c*d; sum:=pr1+pr2; writeln('За ',a,'б хлеба и ',c,'б молока вы залатите ',sum,' руб.') end.

[@Chooyka]

Норм?

[@prostieresheniya]

Да, все правильно 👍

[@Kerix07]

Блин вообще не понимаю ка дз сделать

[@pashal4kgames183]

гайды простые но видео ломание😂

[@prostieresheniya]

Немного не понял) что значит «ломание»?

[@pashal4kgames183]

@@prostieresheniya все я разобрался, это виноват Ютуб. Проблема была в том, что видео идёт позже чем воспроизводится звук

[@masafaka2198]

program Посчитать_сумму_покупки_двух_товаров; var a,b,c,d,i:integer; begin writeln('Введите кол-во булок хлеба: '); read(a); writeln('Введите цену одной булки хлеба: '); read(b); writeln('Введите кол-во бутылок молока: '); read(c); writeln('Введите цену одной бутылки молока'); read(d); i:=a*b+c*d; write('За ',a,'б хлеба и ',c,'б молока вы заплатите ',i,' руб.') end.

[@prostieresheniya]

Вроде всё правильно)

[@masafaka2198]

@@prostieresheniya прошел год с видео , а вы так же отвечаете на комментарии ,благодарю

[@prostieresheniya]

@@masafaka2198 Надеюсь видео не потеряло свою актуальность) почему бы и не ответить людям которые смотрят мои ролики)

[@gosh4ch1nar]

program Homework; var a, b, c, d, sum: integer ; begin writeln (‘Введите кол-во булок хлеба:’); read(a); writeln (‘Введите цену одной булки хлеба:’); read(c); writeln (‘Введите кол-во бутылок молока:’); read(b); writeln (‘Введите цену одной бутылки молока:’); read(d); sum:=c*a+d*b; write(‘За’, a, ‘булок хлеба и’, b, ‘бутылок молока вы заплатите’, sum, ‘рублей’); end.

[@animeshnik3861]

program hleb; var a,s,d,f,g:integer; begin a:=4; s:=2; d:=30; f:=60; g:=a*d+s*f; write('за ',a,'б хлеба и ',s,'б молока вы заплатите ',g,' руб.'); end. если кому то нужно

[@tyzyk76]

нет, надо сделать так чтобы ты сам вводил в строку кол-во и цену

[@user-cu9np1sq3h]

вот д/з кому надо) program dz; var KX,CX,KM,CM,OCX,OCM,OC:real; begin writeln(' КАЛЬКУЛЯТОР ПОКУПКИ2'); writeln(' '); write(' ВВЕДИТЕ КОЛ-ВО БУЛОК ХЛЕБА: '); read (KX); write(' ВВЕДИТЕ ЦЕНУ ОДНОЙ БУЛКИ ХЛЕБА: '); read (CX); write(' ВВЕДИТЕ КОЛ-ВО БУТЫЛОК МОЛОКА: '); read (KM); write(' ВВЕДИТЕ ЦЕНУ ОДНОЙ БУТЫЛКИ МОЛОКА: '); read (CM); writeln(' '); writeln('ОБЩАЯ ЦЕНА ХЛЕБА'); OCX:=(KX*CX); writeln(OCX); writeln(' '); writeln('ОБЩАЯ ЦЕНА БУТЫЛОК МОЛОКА'); OCM:=(KM*CM); writeln(OCM); writeln(' '); OC:=(OCX+OCM); writeln('ОБЩЯЯ ЦЕНА ТОВАРА РОВНЯЕТСЯ:', OC); writeln('ОТВЕТ: за ',KX,' булки хлеба и ',KM,' бутылок молока вы заплатите ',OC,' руб '); END.

[@user-cu9np1sq3h]

KX- количество хлеба CX- стоимость хлеба KM- количество молока CM- стоимость молока OCX- общая цена хлеба OCM- общая цена молока OC- общая стоимость