Идея прекрасная! НО!!!! изложение материала, напоминает мне вот что: "одно яблоко плюс одно яблоко - будет два яблока; два яблока плюс одно яблоко - будет три яблока... А теперь, когда мы научились производить вычисления - рассчитаем массу черной дыры, зная коэффициент гравитационного искажения света, проходящего на расстоянии n..."
Отличное видио! Все понятно и по теме, ни чего лишнего! ))) Обязательно просмотрю все видио, думаю, что узнаю много нового! А те кто говорят, что им не понятно о чем идет речь, так начните с азов, а потом уж переходите на темы посложнее тогда точно все будет понятно!
Есть от чего оттолкнутся)) Большая часть коментов правильно говорят, очень трудно понять что к чему. Но ни кто ведь не мешает покопаться в интернете и найти объяснение что к чему))Видео Уроки самый раз) спасибо тебе за работу которую ты сделал....
Неплохо, неплохо. Но если ты делал этот урок для новичков, то тут стоит объяснять поэтапно, т. е. думаю не все сразу же смогут освоить материал и написать свою первую, hello, world. Сначала нужно объяснить принцип работы ввода вывода, отдельно уделить внимание( в другом видео уроке), понятию что такое метод приват или паблик, отдельно поговорить про модули. Но повторюсь материал подан хорошо, но для новеньких будет менее понятно.
кто непонял, читайте вот что. в конце каждого "действия" нужно ставить точку с запятой, они отделяют одну команду от другой. var это переменная, то что вы там напишете это значение переменной и её тип(числовой-числа, строковый-буквы или то что будет читаться как буквы, тоесть не будет складываться, булевой-слишком долго объяснять идите гуглить). остальное по мелочам, сами потом поймёте, но видео реально для тех кто уже хоть как-то разобрался.
Program Privetik; var a:string; b:string; c:string; d:string; e:string; begin writeln('Как тебя зовут красотуля :0'); readln(a); Writeln('Шо поделываешь?'); readln(d); Writeln('Ты бяка. Что ты сможешь мне ответить?'); readln(c); Writeln('Сам(а) такой(ая) -_-'); readln(d); Writeln('Ну все, я обиделся :('); readln(e); Writeln('Ой,всё!'); end.
Fx PandaCoper Лучше просто var a, b, c, d, e:string; Да и вообще можно в данной программе переменные не использовать, так как то что ввёл человек, всё равно не учитывается.
Согласен, этот курс скорее для тех кто уже неплохо разбирается в паскале, но хочет расширить знания. Те кому нужно все разжевывать - ищите курс с нуля.
Красавец, работа с ООП в первом уроке! Нужно сначала расжевать: что такое переменная, какие есть типы данных и т.п. Странно, что приложение не стал писать на первом уроке.
Можно ещё, чтоб все по красоте было, между блоками сбора инфы и её выводом сделать очистку экрана? Во всяком случае Бейсик это делать позволял вставкой команды очистки с указанием времени задержки. Хотелось бы узнать как это реализовано в Паскале. У меня не робит. На var матерится.
спасибо все повторил все получилось. очень хочу научиться программировать так как получил травму руки и больше не смогу работать. посмотрю все твои уроки и обязательно попробую что нибудь от себя
Поясните, пожалуйста. Вот есть запись типа record с некоторыми полями. Есть файл со списком этих данных: город, жители, площадь и район. Как правильно считать данные из входного файла, если входной и выходной файлы-текстовые? Вот я считываю: (f,a) - это ясно: будет строка полная. А как считывать данные в формате (f,a,b,c.. ). У меня программа жалуется, что формат неверный. Не вижу ошибок. паскаль abc.net
У меня со второй программой проблема, пишет " слишком мало или слишком много аргументов передающихся функции "new" " хотя всё вроде точь в точь сделал.
Дружище ты определись -либо ты обучаешь, либо просто показываешь как ты умеешь программировать. -с начало бы потрудились хотя бы алгоритм придумать как ознакомить нас с возможностями программы, и какое мышление от нас требуется чтобы понять программу . Введение -только не заумными словами -а простыми понятными для восприятия ...
А допустим написал программу ,как сделать чтоб она отдельная работала, а не только в паскале, допустим ,чтоб была возможность её установить и она работала
автор у меня вопрос. а у меня андроид и в нем есть паскаль прогг. и я сделал как ты все отлично. но new human. (new) прогг. не принимает как справит и с чем заменить new
спасибо я написал по этому гайду калькулятор взял write('напиши второе число которое нужно прибавить : '); readln (h.operatorB); ну там изи вообще 10 мин спасибо)))
Скажите пожалуйста Почему я когда создал программу и проверил её на работоспособностью, она мне выдала ошибку на слово ELSE и писалсось ОЖИДАЛОСЬ ПЕРЕМЕННАЯ Пожалуйста помогите!!!!!!!!!
а возможно узнать в какой матрице он пишет что за прога я нуубб со стажем !!! так все нравиться !!! спасибо . и еще где почитать о инструментах паскаля и его командах что они означают и с чем их есть ??хотя может я загоняюсь ?
Если у кого ошибка с else вот вам поправочка: readln(h.Age); if (h.Age>17) then writeln('Ti uze!Soversheno letniy!') else writeln('Oi! Da ti ese mal.'); write('Ladno.A skasi svoi rost: '); P.S Я писал транслитом Кому надо вот мой скрипт: type Human=class public Name:string; Age:integer; Height:integer; end; var h:Human; begin h:=new Human; write('Privet! Ya xochu uznat nemnogo o tebe.'); write('Kak teby zovut: '); readln(h.Name); write('Prekrasno, ', h.Name, ', a teper skashi, skok tebe let: '); readln(h.Age); if (h.Age>17) then writeln('Ti uze!Soversheno letniy!') else writeln('Oi! Da ti ese mal.'); write('Ladno.A skasi svoi rost: '); readln(h.Height); writeln(); writeln('Nu vot i vse .Mi sobrali vsu neobxodimuy infu:'); writeln('Teby zovut ', h.Name); writeln('Tebe ', h.Age); writeln('Tvoi rost: ', h.Height, ' sm'); writeln(); writeln('Sps, ', h.Name, '.S toboi bila Alena, BB!'); end.
А нормально то что я 4 классе делаю 3д модели, 3Д анимации, 3Д игры на BGE, игры и проги на CTF(Clickteam Fusion 2.5) и пишу на Poscal ABS (Пока не фонтан на Pascal ABS)???
Не очень люблю, когда паскаль объясняют с программы "Здравствуй, мир". У нас препод по информатике заставил записывать штук 15 операторов и описание к ним, потом начал объяснять программу типа "a+b=c", где и присутствовали все эти операторы, не знаю, как сверстникам, но мне было понятно.
Program gg; var a,b,c,d:string; Humen:string; Name:string; Age:integer; begin write('поприветствуй бота ' ); readln(a); writeln('Приветик, Мне нужно собрать твои данные'); writeln('И для этого, напиши своё имя'); read(Name); writeln('Отличное имя ' ,Name, ' А теперь введи в строку сколько тебе лет!' ); read(Age); writeln('Замечательно,' ,Name, '! Теперь я эту информацию заложу в хранилище!'); writeln('Приятно иметь с вами дело, пока!'); end.
Идея прекрасная! НО!!!! изложение материала, напоминает мне вот что:
"одно яблоко плюс одно яблоко - будет два яблока; два яблока плюс одно яблоко - будет три яблока... А теперь, когда мы научились производить вычисления - рассчитаем массу черной дыры, зная коэффициент гравитационного искажения света, проходящего на расстоянии n..."
проорал с комента
Согласен с тобой чувак))) очень здорово что теперь я могу написать под диктовку программу, но от этого я не начал понимать что и зачем я делаю)
в точку ))))).......
Привет, можешь подсказать где можно научиться работать на Turbo Pascal и Delphi очень хочу научиться
Евгений Головейко Четко чувак
Туториал отличный!Сразу вник в происходящие
//Моя программа на языке Pascal #1
//
//----Заполнение Анкеты-------
type
Human=class
public
Name:string;
Lastname:string;
Age:integer;
end;
var
h:Human;
begin
h:=new Human;
writeln('Здравствуйте, пользователь!');
writeln('Заполните анкету');
//Считывание информации
write('Ваше имя: ');
readln(h.Name);
write('Ваша фамилия: ');
readln(h.Lastname);
write('Ваш возраст: ');
readln(h.Age);
writeln('Ваша анкета успешно заполнена!');
writeln('------------------------------');
writeln('Вывод вашей анкеты:');
//Вывод записаной информации
writeln('Ваше Имя: ', h.Name);
writeln('Ваша Фамилия: ', h.Lastname);
writeln('Ваш Возраст: ', h.Age);
end.
Для человека который не видел до этого паскаль этот видос как физика для ученика 3 класса.
Я в 4 классе. Я все поняла.
Мой мозг развет больше в математическую сторону но это не так сильно влеяет.
Мне нравиться , спасибо
@@Atori_2739 ++ но мне 15😂😂
@@Atori_2739 оно и видно.
Синтаксис языка очень убогий, С++ и то читается проще.
Отличное видио! Все понятно и по теме, ни чего лишнего! ))) Обязательно просмотрю все видио, думаю, что узнаю много нового! А те кто говорят, что им не понятно о чем идет речь, так начните с азов, а потом уж переходите на темы посложнее тогда точно все будет понятно!
Большое спасибо за урок! Наконец-то нашёл видео где всё отлично и без всякой воды с подробным описанием каждого символа
Есть от чего оттолкнутся)) Большая часть коментов правильно говорят, очень трудно понять что к чему. Но ни кто ведь не мешает покопаться в интернете и найти объяснение что к чему))Видео Уроки самый раз) спасибо тебе за работу которую ты сделал....
Отличный урок , все доходчиво и понятно . Спасибо.
Большое спасибо за урок!Очень долго парился с этим паскалем,а тут так легко и просто:)
Мда. Тут народ не шарит, что умножаются числа знаком "*", а делятся "/", а вы тут про ООП рспинаетесь. Может го сразу ассемблер учить?
😶👌
Неплохо, неплохо. Но если ты делал этот урок для новичков, то тут стоит объяснять поэтапно, т. е. думаю не все сразу же смогут освоить материал и написать свою первую, hello, world. Сначала нужно объяснить принцип работы ввода вывода, отдельно уделить внимание( в другом видео уроке), понятию что такое метод приват или паблик, отдельно поговорить про модули. Но повторюсь материал подан хорошо, но для новеньких будет менее понятно.
Отлично, Сергей! Очень интересно и всё понятно! Мне нравится
Ну это просто восхитительно!!!! Я это сделала!!! Свою первую программу!!!! Спасибо за доступную информацию!!!!
кто непонял, читайте вот что.
в конце каждого "действия" нужно ставить точку с запятой, они отделяют одну команду от другой.
var это переменная, то что вы там напишете это значение переменной и её тип(числовой-числа, строковый-буквы или то что будет читаться как буквы, тоесть не будет складываться, булевой-слишком долго объяснять идите гуглить).
остальное по мелочам, сами потом поймёте, но видео реально для тех кто уже хоть как-то разобрался.
Тебя зовут Сергей.
Тебе 19 лет.
Рост 168.
Учишь программированию в ютюбе.
Мы тебя найдём;)
186 а не 168
😂😂👍👍
Лучшее, что я видел! Спасибо.
Program Privetik;
var
a:string;
b:string;
c:string;
d:string;
e:string;
begin
writeln('Как тебя зовут красотуля :0');
readln(a);
Writeln('Шо поделываешь?');
readln(d);
Writeln('Ты бяка. Что ты сможешь мне ответить?');
readln(c);
Writeln('Сам(а) такой(ая) -_-');
readln(d);
Writeln('Ну все, я обиделся :(');
readln(e);
Writeln('Ой,всё!');
end.
Fx PandaCoper Лучше просто var a, b, c, d, e:string;
Да и вообще можно в данной программе переменные не использовать, так как то что ввёл человек, всё равно не учитывается.
Я знаю,что коммент был написан давно,но это так,для новеньких,переменные одного типа можно перечислить в одну строчку.
😂😂👍👍
Отличное видео ! Спасибо за хорошее объяснение.
Классный пример так и надо учить программирования, респект и уважуха за данный пример.
Новичкам не советую. Только для повторения
Спасибо, как для питон разраба всё очень понятно и интересно!
пожалуйста повыполняй программы на решение задач
Как ставить "минус" перед begin и прочими командами ?
+Ованнес Агаджанян там в настройках можно эту функцию включить
+Ованнес Агаджанян он сам ставится, в более ранних версиях, а сейчас нет, просто пишешь команду и все
Спасибо! Вы помогли мне освоить программирование! Благодарю и жду 2-ю часть!
Это конечно программирование но ты его не освоил, это просто курс 6 класса школьной программы, есть еще куча более сложных языков, как минимум
Спасибо, за 1 урок. Теперь мне подучить надо всё, что я переписал. И ЛАЙК!!!
У меня вопрос. Как поставить условие -- если что-либо написано?
Спасибо!!!! В школе не понял , Вы Объяснили вообще просто вах как хорошо!!!!! Спасибо!!!!!!!!!
Завалите все .Продолжай Сергей.Ваще норм все.
Согласен, этот курс скорее для тех кто уже неплохо разбирается в паскале, но хочет расширить знания. Те кому нужно все разжевывать - ищите курс с нуля.
Все понятно, ничего сложного. Спасибо!
Очень помог. Спасибо за урок)
Нашел самый первый урок и все равно ничего не понимаю "переменная " и т.д. СПАСИБО ! А не для программистов можно с азов начать ?
Все круто, все понятно, спасибо! Лайк=подписка. Иду смотреть второй урок)
Очень хороший и обучающий видос! Спасибо огромное!
Красавец, работа с ООП в первом уроке!
Нужно сначала расжевать: что такое переменная, какие есть типы данных и т.п. Странно, что приложение не стал писать на первом уроке.
у меня почему то ,когда я begin ввожу слево не высвечивается квадрат?
Че как жизнь? Через 5 то лет
🤣🤣🤣🤣убил
А как же собрать прогу?
Но урок понравился очень!
Хорошо что со звуком хорошо!
Класс, всё понятно и доступно, спасибо огромное!!!!!
Здравствуйте . Подскажите пожалуйста как сделать чтобы корабль двигался в обратном напровлении ?
uses graphAbc;
var x,i: integer;
begin
lockdrawing;
x:=0;
setwindowsize(640,480);
for i:=1 to 200 do
begin
x:= x+1;
ClearWindow;
setbrushcolor(clYellow);
circle(580,70,30);
setbrushcolor(clNavy);
rectangle(0,400,640,480);
line(x+100, 400, x+400, 400);
line(x+30,350, x+430,350);
line(x+100,400, x+30, 350);
line(x+400, 400, x+430, 350);
floodfill(x+100+10, 400-10, clBrown);
line(x+200, 100, x+200, 350);
line(x+45, 300, x+400, 300);
line(x+45, 300, x+200, 150);
line(x+200, 150, x+400, 300);
floodfill( x+200+10, 300-10, clLime);
floodfill(x+200-10, 300-10, clLime);
line(x+200, 100, x+235, 125);
line(x+200, 125, x+235, 125);
floodfill(x+210, 120, clRed);
floodfill(10,12, clSkyBlue);
sleep(10);
redraw;
end;
end.
Ну раз обязательное условие, то ставлю Like :)
чтобы поставить скобки надо зайти в сервис после настройки и редактор и ставим галочки
Очень хорошо объяснил ! Лови лайк и подписку !
Можно ещё, чтоб все по красоте было, между блоками сбора инфы и её выводом сделать очистку экрана? Во всяком случае Бейсик это делать позволял вставкой команды очистки с указанием времени задержки. Хотелось бы узнать как это реализовано в Паскале.
У меня не робит. На var матерится.
Отличный урок! Спасибо.
Довольно интересно Большое спасибо!PROTEBA
спасибо все повторил все получилось. очень хочу научиться программировать так как получил травму руки и больше не смогу работать. посмотрю все твои уроки и обязательно попробую что нибудь от себя
Ну и что вышло
Нет. у меня родился 3й ребенок и я бросил.
Поясните, пожалуйста. Вот есть запись типа record с некоторыми полями. Есть файл со списком этих данных: город, жители, площадь и район. Как правильно считать данные из входного файла, если входной и выходной файлы-текстовые? Вот я считываю: (f,a) - это ясно: будет строка полная. А как считывать данные в формате (f,a,b,c.. ). У меня программа жалуется, что формат неверный. Не вижу ошибок. паскаль abc.net
Я все понял (не очень), но смог разобраться сам и даже поэкспериментировал, тем самым поняв возможности программы больше.
У меня со второй программой проблема, пишет " слишком мало или слишком много аргументов передающихся функции "new" " хотя всё вроде точь в точь сделал.
h:= это оператор присваивания? Просто вспомнить решил.
:= - это оператор присваивания, ты прав.
Помогите пж!, я когда пишу комманду Begin, делаю программу, запускаю, а мне пишет:,, Встречено begin, а ожидалось ; ,,
Как сделать, что бы была такая линия от begin до end. И, чтобы перед begin был -!? Ответьте!
Дружище ты определись -либо ты обучаешь, либо просто показываешь как ты умеешь программировать.
-с начало бы потрудились хотя бы алгоритм придумать как ознакомить нас с возможностями программы, и какое мышление от нас требуется чтобы понять программу .
Введение -только не заумными словами -а простыми понятными для восприятия ...
Точняк +1😂😂
Такой вопрос,как сделать чтобы как и на видео от Begin до End. проходила полоса,показывающая начало и конец ?
А допустим написал программу ,как сделать чтоб она отдельная работала, а не только в паскале, допустим ,чтоб была возможность её установить и она работала
автор у меня вопрос. а у меня андроид и в нем есть паскаль прогг. и я сделал как ты все отлично. но new human. (new) прогг. не принимает как справит и с чем заменить new
Зачем ты добавляешь "-ln" когда пишешь "write"? Ничего не меняется емли написать или нет ведь
А как сделать так,чтоб все данные сохранялись в определенном месте????
как сделать эти разделения кода, у меня всё в столбик пишется?
У вас там не ошибка, случайно? После if (h.Age>17) then writeln(*) - там else без условия, или так и должно быть?
когда я открываю программку которую сохранил то мне пишет не понятно что.
Что надо установить на компьютер что бы открывать файлы из паскаля?
Я в школе проходил эту тему нихера не понял. Посмотрел твое видео все понятно стало!!!
Ребят ну помогите плиз. На видео у него слева в окне все команды группируются,
у меня же идут сплошным переносом вниз. как сделать что бы как у него?
какой индикатор после readln нужно поставить?
После begin на какой кнопку нажать не знаю.пазор.энтр нажал.но не получается
как сделать так чтобы все введенные переменные сохранялись до следующего включения этой программы(EXE файл)?
Vlad Dalv думаю с помощью текстового файла.
Салам.Какой приложения усползуете для прогграмы
Спасибо Сергей!
Блогадаря курсу смог писать игры сейчас являюсь джава разработчикам кому интерестно зайдите на сайт java rush
Спасибо, что рассказал о uses! Вообще не шарил...
спасибо я написал по этому гайду калькулятор взял write('напиши второе число которое нужно прибавить : ');
readln (h.operatorB); ну там изи вообще 10 мин спасибо)))
У меня 1 ошибка на слове else, пишет что "ожидался оператор", есть идеи?
Скажите пожалуйста Почему я когда создал программу и проверил её на работоспособностью, она мне выдала ошибку на слово ELSE и писалсось ОЖИДАЛОСЬ ПЕРЕМЕННАЯ
Пожалуйста помогите!!!!!!!!!
Вау, блин у меня были проблемы в школе с этой темой ...а теперь все понятно
Учитель ужасен полный игнор
Есть проблема, выводит ошибку перед Name :"Встречено'Name', а ожидалось ':'.
В чём может быть проблема????
Я бы этот выпуск назвал"Как сделать текстовый квест на Паскале."
как музыка в начале ролика называется???
Что значит: нет перегруженной подпрограммы с такими типами параметров?
Почему когда пдключаешь модуль crt Abc.Net требует запускать прогоамму через Shift+F9?
Очень круто.
Спасибо за урок
У меня "else" не распознаётся((
begin
h:=new human;
пишет неверное выражение, что посоветуете?
var
h:Human;
begin
h:= new Human;, и всё получится:)
Нельзя вроде ставить пробел в названиях, получается 2 разных значения.
а возможно узнать в какой матрице он пишет что за прога я нуубб со стажем !!! так все нравиться !!! спасибо . и еще где почитать о инструментах паскаля и его командах что они означают и с чем их есть ??хотя может я загоняюсь ?
Дмитрий Смирнов pascalabc.net/ так же в интернетах где то есть версия без майкрософтовского ".NET".
Хорошо что я хоть чуть знал Паскаль так бы тупил,но все ровно спасибо
Супер!!!) Спасибо за урок!
Всё ок. Думаю тебе нужно панель инструментов тоже показывать
Height - высота, все правильно.
Как вы сделали
что появилась табличка что использовать например Age
Если у кого ошибка с else вот вам поправочка:
readln(h.Age);
if (h.Age>17) then writeln('Ti uze!Soversheno letniy!') else writeln('Oi! Da ti ese mal.');
write('Ladno.A skasi svoi rost: ');
P.S Я писал транслитом
Кому надо вот мой скрипт:
type
Human=class
public
Name:string;
Age:integer;
Height:integer;
end;
var
h:Human;
begin
h:=new Human;
write('Privet! Ya xochu uznat nemnogo o tebe.');
write('Kak teby zovut: ');
readln(h.Name);
write('Prekrasno, ', h.Name, ', a teper skashi, skok tebe let: ');
readln(h.Age);
if (h.Age>17) then writeln('Ti uze!Soversheno letniy!') else writeln('Oi! Da ti ese mal.');
write('Ladno.A skasi svoi rost: ');
readln(h.Height);
writeln();
writeln('Nu vot i vse .Mi sobrali vsu neobxodimuy infu:');
writeln('Teby zovut ', h.Name);
writeln('Tebe ', h.Age);
writeln('Tvoi rost: ', h.Height, ' sm');
writeln();
writeln('Sps, ', h.Name, '.S toboi bila Alena, BB!');
end.
Program1.pas(32) : Встречено 'writeln', а ожидалось ';' что это значит
что делать пишет Program1.pas(11) : Встречено 'begin', а ожидалось ';'
А нормально то что я 4 классе делаю 3д модели, 3Д анимации, 3Д игры на BGE, игры и проги на CTF(Clickteam Fusion 2.5) и пишу на Poscal ABS (Пока не фонтан на Pascal ABS)???
Это норма! Ты просто мамин гений!!!
Не очень люблю, когда паскаль объясняют с программы "Здравствуй, мир". У нас препод по информатике заставил записывать штук 15 операторов и описание к ним, потом начал объяснять программу типа "a+b=c", где и присутствовали все эти операторы, не знаю, как сверстникам, но мне было понятно.
10:10 надо было написать: ну вот и все, мы собрали всю необходимую информацию, жди повестку.
Program gg;
var
a,b,c,d:string;
Humen:string;
Name:string;
Age:integer;
begin
write('поприветствуй бота ' );
readln(a);
writeln('Приветик, Мне нужно собрать твои данные');
writeln('И для этого, напиши своё имя');
read(Name);
writeln('Отличное имя ' ,Name, ' А теперь введи в строку сколько тебе лет!' );
read(Age);
writeln('Замечательно,' ,Name, '! Теперь я эту информацию заложу в хранилище!');
writeln('Приятно иметь с вами дело, пока!');
end.
*ПОГНАЛИ ИЗУЧАТЬ КЛАССЫ НЕ ЗНАЯ ОСНОВ СИНТАКСИСА ПАСКАЛЯ!НАЙС ДА?*
прекрасно!
Привет,можешь написать как применить условный оператор со словами.
Ой, господи)))
А так все понятно, спасибо.
Cделал всё как ты выдаёт ошибку в тексте просит ставить скобочки там где ты их не ставил почему так
я из 2018 года я даже щяс не хрена не понимаю
У теба на аве Клеш Рояль, не удивительно, что ты ничего не понимаешь
я из 2020:
МММММ как понятно
@@shelukha228 Я из 2021:
Мммм пздц как понятно