Огромное спасибо автору. Вы талантливый преподаватель. Преподаете превосходно. Я окончил школу давным-давно, но лёжа в больнице за неделю освоил Pascal. Было очень интересно.
Огромейшее спасибо. Начали изучать по информатике язык Паскаль, так я вообще ничего не понимала. Посмотрела ваши урокии наконец-то хоть что-то запомнила и разобралась с задачами.Спасибо за понятное объяснение.
Спасибо вам за понятное объяснение и интересные задачки. Очень здорово, что прямо-таки для даёте объяснение понятное для каждого. Учусь на первом колледже на программиста и нам приготовили входной экзамен. Благодаря вам начал въезжать и в конце концов планирую научиться решать задачу 15.2
@@prostieresheniya мотивация порождает труд, а труд должен порождать зарплату. Надеюсь, вы также извлекаете выгоду из своих видеоуроков(ведь, тоже самое репетиторство далеко не бесплатное).
@@Фыва-ж9м Спасибо большое! Для тех кто хочет поддержать есть ссылка на курс с проверкой дз в автоматическом режиме на разных тестах и других заданиях на понимание. А вообще эти уроки я делал для своих учеников в школе, ну и решил что вдруг кому то ещё пригодиться)
@@Фыва-ж9м Раньше пользовался)) Сейчас ушел просто в репетиторство к ОГЭ и ЕГЭ, чтобы было больше времени для творчества. Школьная гонка 6 дней в неделю очень тяжело. Хотя уроки это лучшее что есть в школе, и общение с учениками))
Спасибо большое за видео! Последний раз на паскале писала в прошлом году, и то с учебника, а сейчас огэ, уже все забыла, но благодаря вашему видео вспомнило все важное и узнала новое!
Огромное спасибо за курс, учусь в 8 классе теперь всю информатику за год знаю. Отлично объясняете, вопросов не остаётся, желаю удачи и активности на канале)
Очень здорово с паскаля и нужно начинать, во первых паскаль строго типизированый язык, во вторых он и был создан для обучения во вторых на примерах паскаля гораздо проще людям объяснить те же указатели чем на си
@@prostieresheniya program pon; var a,b,c,sum,p,:integer; sred:Real; begin WriteLn('Введите три числа: '); read(a,b,c); sum:=(a+b+c); p:=a*b*c sred:=(a+b+c)/3; WriteLn(a,'+'b, '+',c '='sum); Writeln(a,'*',b, '*' c '=' p); WriteLn('(',a,'+',b,'+',c,')/='sred); end.
var a,b,c,sum,p,:integer; - Уберите последнюю запятую после переменной p, программа ждёт что за ней должна быть другая переменная раз вы запятую ставите
2:22:22 , я сделала немного по-другому, но масштабнее: program age1; var a, b, v :integer; begin write ('Возраст Антона: '); readln (a); write ('Возраст Бориса: '); readln (b); write ('Возраст Виктора: '); read (v); if a > b then if a > v then write ('Ответ: Антон старше всех.'); if b > a then if b > v then write ('Ответ: Борис старше всех.'); if v > a then if v > b then write ('Ответ: Виктор старше всех.'); if v = a then if a > b then if v > b then write ('Ответ: Антон и Виктор старше Бориса.'); if v = b then if b > a then if v > a then write ('Ответ: Борис и Виктор старше Антона.'); if a = b then if a > v then if b > v then write ('Ответ: Антон и Борис старше Виктора.'); if a = v then if a = b then if v = b then write ('Ответ: Антон, Борис и Виктор одинакового возраста.'); end.
Конечно работать будет, но... Если вы будете работать над проектами, то лучше такое не использовать. Лёгкие небольшие действия занимают слишком много места (и вы запутаетесь на двухсотой строке кода и когда будут появляться ошибки вы просто не поймёте куда смотреть). Поэтому сложные условия более практичны
1:15:39 я не понимаю как в последнюю строку ввести 4, 2 и 240. В переменной я их получила, но как их ввести в строку, было бы хорошо если бы вы объясняли дз :(
Вы к сожаления не сильно внимательно смотрели урок. Нужно выводить переменные в операторе вывода через запятую, между ними можно ещё выводить и текст, главное не забывать отделять объекты запятыми write(a, 'тут текст', b, 'тут текст', c);
Да из разряда раньше писали как перебрать мотор, а сейчас что нельзя пить электролит) я это все проходил в 9 классе в кружке компьютеров двк и единственная игра требующая выключения сети была пакмэн) это был 89 год где Бейсик считался для идиотов и интересовали машинные коды) а перед этим паяли микросхемы на логических элементах для светофора ) Но искренне спасибо вам за вашу работу!
Добрый день, а это "тот же" Паскаль что был всегда? Просто вижу что какой-то навороченный PascalABC... или можно просто внутри него ограничиваться "классическим" уровня 20 лет назад?
@@prostieresheniya добрый день. Могу ли я у вас узнать как записать функцию y=0.5log3(x-1)^2. Весь прикол в том что я не понимаю как записать правильно логорифм. Мучаюсь с этим уже не первый день и все что получилось это y:=0.5*ln(sqr(x-1)).
@@prostieresheniya, просто у меня появляется надпись "нечем открыть файл". Так то я все понимаю, но практиковаться не могу. Какую программу посоветуете, если она есть???
@@lkpo_970 В описании к ролику есть ссылка на мой курс на stepik. Можно скачать приложение stepik на телефон и там будет строенный компилятор паскаля, у меня многие так прогают на телефоне с приложения. Там будет много дз и автоматическая проверка. Курс платный 499 р
для дз 4 урока можно ли решить все так? program fifty; var a,b,M:integer; begin read(a,b); M:=a; if a>b then if M>50 then writeln('YES'); if a50 then writeln('YES'); end; if M
добрый вечер, вы дали бесценный багаж знаний. Но мне не достаточно, можете пожалуйста посоветовать литературу, которая уровнем чуть выше чем ваши ролики( они классные, но я все запомнил и мне нужно двигаться дальше ). Спасибо.
Добрый день!) Спасибо за комментарий, но я даже не знаю какой ресурс Вам посоветовать или какую книгу. Вообще я дам другой совет, начните изучать другой язык программирования, Паскаль нужен только для обучения основ, и на нём никто не пишут уже давно, даже в школах уже Питон изучают
Максимально примитивное распределение, вдобавок оптимизация наверное хромает, но вот: program acd;var t,h,m,s,d,y:integer; x:char;begin writeln('Введите число секунд'); readln (t); m:=t div 60; s:=t mod 60; if (s>=60) then h:=s div 60; if (s>=60) then s:=s mod 60; if (m>=60) then h:=m div 60; if (m>=60) then m:=m mod 60; if (h>=60) then d:=h div 60 else d:=0; if (h>=60) then h:=h mod 60; if (d>=365) then y:=d div 60 else y:=0; if (d>=365) then d:=d mod 60; if (y= 1) or (y=2) or (y=3) or (y=4) or (y=21) or (y=22) or (y=23) or (y=24) or (y=31) or (y=32) or (y=33) or (y=34) or (y=41) or (y=42) or (y=43) or (y=44) or (y=51) or (y=52) or (y=53) or (y=54) or (y=61) or (y=62) or (y=63) or (y=64) or (y=71) or (y=72) or (y=73) or (y=74) then x:='г' else x:='л'; writeln(y,' ',x,'. ',d,' д. ',h,' ч. ',m,' мин. ',s,' с.') end.
@@prostieresheniya, Задачи с наибольшим я уже решал в школе, с тремя числами. И пока недавно лазил в паскале, нашёл тот факт, что переменные можно добавлять после начала программы, и в моей голове появилась мысль которая угробила 40 минут моей жизни. Зато теперь у меня есть код с нахождением наибольшего числа, где можно выбрать сколько чисел будет сравниваться( от 1 до 10)
И еще допустим задачка дз на сумму нечетных делящихся на 3 чисел, нужно было дописать нечетных делящихся на 3 БЕЗ ОСТАТКА. Сегодня буду решать задачи впаскале на дополнительном и нужно аработать десятку что 8.5 вышло....
Реально за 4 часа всё расскажет? Выглядит привлекательнее, чем лекция, но зря время не хочется тратить. Лекции курса заканчиваются на темах "Процедуры, функции пользователя и базовые алгоритмы". Изм.: Нет, нереально.
![Паскаль с нуля [ч7]. Одномерные массивы.](/img/n.gif)
Огромное спасибо за этот курс! Учусь на 1-ом курсе и пришел в вуз с нулевыми знаниями программирования. Сейчас уже начал понимать.
Спасибо большое за отзыв))) рад Вам помочь)
Жиза(
А сейчас в вузах учат Паскаль на паскале ведь сейчас нечего не пишут?
Во всех вузах по разному
@@sarcazm7360 ну в целом Паскаль даёт неплохую основу, после которой уже можно осваивать другие языки. Но кнчн сам Паскаль нигде не используется.
Спасибо огромное за это видео! я буквально с нуля после вашего видео стал понимать что к чему в языке паскаль!
Спасибо большое) очень приятно читать такие отзывы)
Замечательное объяснение, отвечаете на все вопросы, которые у меня возникают
Спасибо за отзыв) Очень рад что удалось Вам помочь)
Огромное спасибо автору. Вы талантливый преподаватель. Преподаете превосходно. Я окончил школу давным-давно, но лёжа в больнице за неделю освоил Pascal. Было очень интересно.
Спасибо большое)) очень приятно)
Срасибо, за 4 часа понял все, хотя до этого вообще не понимал что такое паскаль
Это круто!!! Рад был Вам помочь 👍
Огромейшее спасибо. Начали изучать по информатике язык Паскаль, так я вообще ничего не понимала. Посмотрела ваши урокии наконец-то хоть что-то запомнила и разобралась с задачами.Спасибо за понятное объяснение.
Спасибо большое за отзыв) рад был Вам помочь)
@@prostieresheniya подскажите, в курсе рассматривается objectPascal?
@@vanmihaylovich добрый день, нет не рассматривается(
Спасибо вам за понятное объяснение и интересные задачки. Очень здорово, что прямо-таки для даёте объяснение понятное для каждого. Учусь на первом колледже на программиста и нам приготовили входной экзамен. Благодаря вам начал въезжать и в конце концов планирую научиться решать задачу 15.2
Спасибо большое за отзыв) Желаю Вам успеха в освоении программирования) всё обязательно получится!)))
В школе на уроках информатики я упустил половину языка, а вы помогли мне вспомнить. Спасибо!!!
Спасибо большое, очень мотивируют такие отзывы)
@@prostieresheniya мотивация порождает труд, а труд должен порождать зарплату. Надеюсь, вы также извлекаете выгоду из своих видеоуроков(ведь, тоже самое репетиторство далеко не бесплатное).
@@Фыва-ж9м Спасибо большое! Для тех кто хочет поддержать есть ссылка на курс с проверкой дз в автоматическом режиме на разных тестах и других заданиях на понимание. А вообще эти уроки я делал для своих учеников в школе, ну и решил что вдруг кому то ещё пригодиться)
@@prostieresheniya Надеюсь, среди учеников вы пользуетесь авторитетом. Я как раз думал, что Вы преподаватель.
@@Фыва-ж9м Раньше пользовался)) Сейчас ушел просто в репетиторство к ОГЭ и ЕГЭ, чтобы было больше времени для творчества. Школьная гонка 6 дней в неделю очень тяжело. Хотя уроки это лучшее что есть в школе, и общение с учениками))
спасибо за эти уроки, очень понятное поэтапное объяснение, желаю большего продвижения и активности)
Спасибо большое за отзыв! Очень приятно)
Огромное Вам спасибо за объяснение 🙏 Очень срочно нужно было разобрать тему и именно вы и помогли мне 🙏😇
Огромное спасибо, в школе есть проблемы с информатикой, спасаюсь вашими роликами💖
Спасибо большое за отзыв)
Та же история, совсем не понимаю Pascal (((
Спасибо большое за видео! Последний раз на паскале писала в прошлом году, и то с учебника, а сейчас огэ, уже все забыла, но благодаря вашему видео вспомнило все важное и узнала новое!
спасибо большое , помогаете мне 2-ки исправить ))))
Спасибо большое за отзыв ☺ Рад что удаётся помочь) Смотрите с VPN чтобы поддержать канал 🙏
Спасибо тебе большое очень понятно объясняещь
👍
Лучший учитель по паскалью!
Спасибо
Спасибо большое ☺️
спасибо огромное автору, объяснил все понятным и простым языком языком. Вместе с объяснением сразу практика и домашние задания.
Спасибо большое за отзыв) очень приятно читать такие комментарии)
Pascal жив!
Конечно))
Спасибо вам! Это как раз то, что мне было нужно!
Спасибо за отзыв))
Мне кажется видео будет очень понятным)) Вы очень здорово объясняете!
Спасибо большое) надеюсь вам понравится))
@@prostieresheniya уже все понравилось))прям очень классно
Гениально, Карл! Обжект и турбо истрахали уже. Лайкос подписос)))
хахахха))) Спасибо) неожиданный позитивчик)
Огромное спасибо за курс, учусь в 8 классе теперь всю информатику за год знаю. Отлично объясняете, вопросов не остаётся, желаю удачи и активности на канале)
Спасибо большое за отзыв)
спасибо огромное, вы лучший!! поняла все с первого раза
Спасибо большое за отзыв)
Большое вам спасибо. Вы все так подробно объяснили
Спасибо большое за отзыв)
спасибо! отлично объясняете . поняла темы которые 2 года проходили...
Спасибо большое за отзыв))) очень приятно читать такие комментарии))
Просто на учёбе вы ещё это закрепляете, пишите контрольные. Да и раз в неделю всего информатика (обычно).
спасибо, очень помогли!😊всех вам благ
Спасибо за отзыв)))
Благодарю за работу!
Спасибо большое)
Дай Вам Бог здоровья)
Спасибо большое) если что этот курс с увеличенным ДЗ и автопроверкой есть бесплатно на степике, ссылка в описании)
Спасибо. Завтра Олимпияда как раз ещё раз вспомню старое. Учюсь в 6 классе)!
Спасибо) Надеюсь олимпиада удалась)
Спасибо за видео, учусь заочно, очень помог данный контент.
Спасибо, Вам большое, Вы лучшие!!!!!!!!
Советую смотреть на х2. Скорость не сильно ощущается, но 4 часа превращаются в 2.
Спасибо за урок) Скоро олимпиада по информатике, а паскаль совсем не знаю.
Спасибо большое за отзыв)) Для олимпиады конечно лучше использовать питон или c++
Огромное спасибо за урок)
Спасибо большое за отзыв)
Спасибо, у нас в 9 щас проходит паскаль👌
По программе потому что программирование в 9 классе))
Спасибо! ❤
2:41:07 - ошибка
условие c5, при c=4 является истинным
Да-да, там есть такое) хорошо что заметили)
Большое спасибо ха ролик 😊
Большое спасибо всё оченьпонятно изучяю в 6 классе
Круто для 6 класса изучать программирование)) и ещё более круто что Вам всё понятно))
@@prostieresheniya когда кстати ролик по оставшимся 699 с лишним языкам?
@@ВладимирПопов-у1д Есть курс п питону на канале. По остальным не планирую)))
Очень здорово с паскаля и нужно начинать, во первых паскаль строго типизированый язык, во вторых он и был создан для обучения во вторых на примерах паскаля гораздо проще людям объяснить те же указатели чем на си
Полностью согласен 👍
спасибо вам большое все четко и понятно
Видео оказалось намного полезнее школьного учителя
На 2x смотрится восхитительно
Спасибо вам большое:)))
Спасибо за отзыв)))
Я выучил PHP/JS/C++/HTML/CSS и ещё паскаль, спасибо)
Хотя не учусь в 8 классе
Очень круто 🙌 Теперь осталось пройти у меня курс по Python, и будет полный набор 🤣
Spasibo bolshoe o4en klassno!
Спасибо за отзыв)
Давай ещё такое видео только про работу с модулями особенно меня интересует GraphABC
Оооо да, спустя 3 года в программировании, я вернулся сюда, чтобы вспомнить начальную боль!
Почему Вам пришлось вернуться к Паскалю?
@@prostieresheniya Вспомнить с чего всё начиналось, паскаль неплохой язык в плане обучения
Спасибо за уроки!!
Большое спасибо ❤
44:56 он нарисовал о_о🙂
1:13:55
Пишет, что перед integer надо поставить [Variable Identifier] как исправить?
нужен полностью код чтобы точно ответить
@@prostieresheniya program pon;
var a,b,c,sum,p,:integer;
sred:Real;
begin
WriteLn('Введите три числа: ');
read(a,b,c);
sum:=(a+b+c);
p:=a*b*c
sred:=(a+b+c)/3;
WriteLn(a,'+'b, '+',c '='sum);
Writeln(a,'*',b, '*' c '=' p);
WriteLn('(',a,'+',b,'+',c,')/='sred);
end.
var a,b,c,sum,p,:integer; - Уберите последнюю запятую после переменной p, программа ждёт что за ней должна быть другая переменная раз вы запятую ставите
@@prostieresheniya спасибо!
Благодарочка
Спасибо большое))
1:01:45 а можно написать 5+6=11 по-другому, то есть вот так:
write('a+b=', sum)?
Тогда а и б не поменяются на 5 и 6, потому как ‘а+б’ будет просто строчкой
@@prostieresheniya поняла, спасибо
2:22:22 , я сделала немного по-другому, но масштабнее:
program age1;
var a, b, v :integer;
begin
write ('Возраст Антона: ');
readln (a);
write ('Возраст Бориса: ');
readln (b);
write ('Возраст Виктора: ');
read (v);
if a > b then
if a > v then
write ('Ответ: Антон старше всех.');
if b > a then
if b > v then
write ('Ответ: Борис старше всех.');
if v > a then
if v > b then
write ('Ответ: Виктор старше всех.');
if v = a then
if a > b then
if v > b then
write ('Ответ: Антон и Виктор старше Бориса.');
if v = b then
if b > a then
if v > a then
write ('Ответ: Борис и Виктор старше Антона.');
if a = b then
if a > v then
if b > v then
write ('Ответ: Антон и Борис старше Виктора.');
if a = v then
if a = b then
if v = b then
write ('Ответ: Антон, Борис и Виктор одинакового возраста.');
end.
Вы сделали через вложенные условия, работать будет, но лучше использовать сложные условия, это локаничней и понятней
Конечно работать будет, но... Если вы будете работать над проектами, то лучше такое не использовать. Лёгкие небольшие действия занимают слишком много места (и вы запутаетесь на двухсотой строке кода и когда будут появляться ошибки вы просто не поймёте куда смотреть). Поэтому сложные условия более практичны
1:15:39 я не понимаю как в последнюю строку ввести 4, 2 и 240. В переменной я их получила, но как их ввести в строку, было бы хорошо если бы вы объясняли дз :(
Вы к сожаления не сильно внимательно смотрели урок. Нужно выводить переменные в операторе вывода через запятую, между ними можно ещё выводить и текст, главное не забывать отделять объекты запятыми write(a, 'тут текст', b, 'тут текст', c);
Да из разряда раньше писали как перебрать мотор, а сейчас что нельзя пить электролит) я это все проходил в 9 классе в кружке компьютеров двк и единственная игра требующая выключения сети была пакмэн) это был 89 год где Бейсик считался для идиотов и интересовали машинные коды) а перед этим паяли микросхемы на логических элементах для светофора ) Но искренне спасибо вам за вашу работу!
Спасибо за такой интересный отзыв)
Жду полный курс python 🐍))
я тоже его жду)) когда же на него решусь)))
Это поддержка комментарий
Спасибо большое)))
3:28:11 , подскажите пожалуйста , почему нельзя было записать x mod 2 > 0 ?
Так тоже можно было бы, ваше решение тоже абсолютно верное
спасибо дядя
на 2:29:58 неправильно написано, должно быть if (x>=10) and (x
Прошёл по таймкоду, там совсем не то
Здравствуйте!
А будет более углубленный курс по Паскаль?
Очень хотелось бы курс по больше.
Просто каких-то обучалок по паскаль почти нет.
Добрый день, а это "тот же" Паскаль что был всегда? Просто вижу что какой-то навороченный PascalABC... или можно просто внутри него ограничиваться "классическим" уровня 20 лет назад?
Да, сейчас, есть действительно навороченный ABC, но я рассказываю классику)
@@prostieresheniya спасибо за ответ - и за видео, конечно же!
Спасибо)))
Спасибо большое за полезный контент! А будут уроки по массивам?
Спасибо большое за отзыв) Пока не планируются, времени совсем нет((
@@prostieresheniyaэх, жаль
Где то паскаль применяется?
Паскаль создавался как язык для обучения программированию. Реально проги на нём никто сейчас не пишет, только учатся
Спасибо:)
Спасибо за отзыв))
что делать неизвестное имя integer на 2 уроке
добрый день! скажите пожалуйста, сильно ли отличается Lazarus от PascalABC?
Добрый день! Если честно я с Lazarus не работал никогда
@@prostieresheniya ладно, спасибо. Просто в понедельник экзамен, а мы пишем на лазарусе
2:41:10 вы ошиблись, у вас с = 4, а в условии с 5, вы сказали что это ложь, а на самом деле это правда
Возможно)
2:41:07 Ц не равно 5?, ц=4, 45 --да, а вы сказали нет. Спасибо за ролик)
Да, там правда ошибся, заболтался))
учу java два месяца(в основном во втором) хочу посмотреть на паскаль так как в девятый класс иду и хочу всё быстро делать
спасибо,помогло
Я чет не понял, как компилятор на произведение 4*5*7 выдал ответ 16??? Смотреть с 1:06:30
Потому что я насрал в твою тарелку и ты схавал это все, насрал в мою тарелку и я схавал твоё говно, и так цикл короче в паскале устроен
Uskov power!
Добрый день. Я думаю что хорошая идея сделать уроки по языку lua. Я пытался найти что то в ютубе но не нашел.
Добрый день)) спасибо конечно за идею)) но сейчас без монетизации и в сложившейся ситуации совсем не хочется что то снимать)
@@prostieresheniya добрый день. Могу ли я у вас узнать как записать функцию y=0.5log3(x-1)^2.
Весь прикол в том что я не понимаю как записать правильно логорифм. Мучаюсь с этим уже не первый день и все что получилось это y:=0.5*ln(sqr(x-1)).
Как можно и где можно скачать паскал
Посмотрите у меня на канале первый урок по Паскалю, там в описании должны быть ссылки
извините пожалуста что пишу ту т нашел ваше видео с разрывом страниц в ворде а у вас старый ворд как сделать это в новом
Посмотрите на канале, скорее всего есть видео в новом ворде. У вас какой ворд?
@@prostieresheniya можете свой вк скинуть я вам скрином отправлю какой у меня ворд
@@трактортоп-о5ш на шапке канала есть ссылка на группу в вк, там можете меня найти и написать
2:42:37 с5 должна 1 стоять, а не 0. 45? Да, верно. 4 не равно 5, значит 1. Или я чего-то не догоняю?
Возможно просто ошибся
Я не понял арифметику, почему начало урока 8-30 но в коде мы пишем 8*60+30?
И ch:= t div (60*60) почему умножаем 60*60?
Зачем нужен t:= t mod (60*60)
А вот на моменте 25:10 есть небольшая проблемка, у меня ТЕЛЕФОН!!! 🥺🥺🥺
И в чем именно проблема?
@@prostieresheniya, просто у меня появляется надпись "нечем открыть файл".
Так то я все понимаю, но практиковаться не могу.
Какую программу посоветуете, если она есть???
@@lkpo_970 В описании к ролику есть ссылка на мой курс на stepik. Можно скачать приложение stepik на телефон и там будет строенный компилятор паскаля, у меня многие так прогают на телефоне с приложения. Там будет много дз и автоматическая проверка. Курс платный 499 р
@@prostieresheniya ну ок
А что на Pascal до сих пор в школе учат? Говорили вроде как на python хотели переходить
В основном все на Python перешли, но думаю не все)
3:44:16 Это ведь арифметическая прогрессия, можно было формулой записать, но ладно
Это конечно Вы правы, можно было и прогрессией, но тут ведь я объясyяю цикл for
для дз 4 урока можно ли решить все так?
program fifty;
var a,b,M:integer;
begin
read(a,b);
M:=a;
if a>b then
if M>50 then writeln('YES');
if a50 then writeln('YES');
end;
if M
я по другому написал
program qq;
var a,b:integer;
begin
write('Введите 2 числа: ');
read(a,b);
if a>50 then
if b
program pyatka;
var a,b,M: integer;
begin
writeln ('Введите два числа: ');
read (a,b);
M:=50;
if a>M then
if bM then
if a
1:12:35 в выводе пропущена 3-ка и поэтому кривы показано в конечном итоге... (4+5+7) /=5
добрый вечер, вы дали бесценный багаж знаний. Но мне не достаточно, можете пожалуйста посоветовать литературу, которая уровнем чуть выше чем ваши ролики( они классные, но я все запомнил и мне нужно двигаться дальше ). Спасибо.
Добрый день!) Спасибо за комментарий, но я даже не знаю какой ресурс Вам посоветовать или какую книгу. Вообще я дам другой совет, начните изучать другой язык программирования, Паскаль нужен только для обучения основ, и на нём никто не пишут уже давно, даже в школах уже Питон изучают
@@prostieresheniya да, возможно, но я студент и 2 семестра у меня будет pascal, придумайте что нибудь пожалуйста
Пока учился div и mod из-за перфекционизма написал до лет, с разделением на года и лет, типо 4 года, 5 лет, при том всё сам
Максимально примитивное распределение, вдобавок оптимизация наверное хромает, но вот:
program acd;var t,h,m,s,d,y:integer;
x:char;begin
writeln('Введите число секунд'); readln (t);
m:=t div 60; s:=t mod 60;
if (s>=60) then h:=s div 60;
if (s>=60) then s:=s mod 60;
if (m>=60) then h:=m div 60;
if (m>=60) then
m:=m mod 60; if (h>=60) then
d:=h div 60 else
d:=0; if (h>=60) then
h:=h mod 60; if (d>=365) then
y:=d div 60 else
y:=0; if (d>=365) then
d:=d mod 60; if (y= 1) or (y=2) or (y=3) or (y=4) or (y=21) or (y=22) or (y=23) or (y=24) or (y=31) or (y=32) or (y=33) or (y=34) or (y=41) or (y=42) or (y=43) or (y=44) or (y=51) or (y=52) or (y=53) or (y=54) or (y=61) or (y=62) or (y=63) or (y=64) or (y=71) or (y=72) or (y=73) or (y=74) then
x:='г' else
x:='л'; writeln(y,' ',x,'. ',d,' д. ',h,' ч. ',m,' мин. ',s,' с.')
end.
Главное что сами до всего дошли и сами придумали! Так держать 👏
Уроки сделал вперёд вас, вдобавок сделал показ минут с нулём в начале, если они меньше 10. Просто ввёл 3-й урок и мне не понравилось как выглядит)
@@prostieresheniya, Задачи с наибольшим я уже решал в школе, с тремя числами. И пока недавно лазил в паскале, нашёл тот факт, что переменные можно добавлять после начала программы, и в моей голове появилась мысль которая угробила 40 минут моей жизни. Зато теперь у меня есть код с нахождением наибольшего числа, где можно выбрать сколько чисел будет сравниваться( от 1 до 10)
@@prostieresheniya, у меня вопрос на 2:42:30, почему во 2 действии, выражение а5 ложно? Ведь это значит что 2=5, разве нет?
Здравствуйте! 1:14:00 - ошибка, нет цифры '3' при делении на три в операторе вывода, соответственно и в окне вывода она не появилась)
И еще допустим задачка дз на сумму нечетных делящихся на 3 чисел, нужно было дописать нечетных делящихся на 3 БЕЗ ОСТАТКА. Сегодня буду решать задачи впаскале на дополнительном и нужно аработать десятку что 8.5 вышло....
Да, это подразумевалось естественно, здесь это уточнение можно не писать)))
Это все основы паскаля?
Ах, да ещё массивы, функции и процедуры
Это разве полный курс?
Полный курс за 9 класс
@@prostieresheniya подскажите пожалуйста, а этого курса достаточно для пользования lazarus, или нужно дальше учить?
Я думаю достаточно, тут основные конструкции, лучше сразу привыкать к синтаксису другого языка
курс прошел. теперь я квалифицированный программист и могу зарабатывать 300к долларов в час?
Полный курс != учебник 8 класс
Да))
@@prostieresheniya ещё улыбается, кликбайтер
Полный курс 8 класса в чем кликбейт я не понимаю
@@prostieresheniya кликбейт, когда заголовок приукрашен от реального сюжета. Если что, "Полный курс" и "Полный курс 8 класса" - вещи тоже разные.
Если хотите считать это кликбейтом, считайте за кликбейт. Я лишь свои уроки объединил в одно большое видеои назвал это полным курсом.
оооой.... ну удачи мне...
Все обязательно получится)))
Раньше я думал, что я не способен к языкам программированиям. Оказалось я путал *ELSE* с *ESLE* ...
😂 хахаха
@@prostieresheniya с этим я с тобой согласен, но на самом деле не очень😉
топ
Хочу выучить паскаль для школы. 7 Класс, хочу удивить либо самостоятельно выучить язык.
Хорошее желание))) успехов в ваших начинаниях)
@@prostieresheniya спасибо)
Молодец, что стремишься учится. Вот моё желание пропало и по итогу с 5 за год скатился до 3,4 и изредка 5.
Реально за 4 часа всё расскажет? Выглядит привлекательнее, чем лекция, но зря время не хочется тратить. Лекции курса заканчиваются на темах "Процедуры, функции пользователя и базовые алгоритмы".
Изм.: Нет, нереально.
А ГДЕ Я ССЫЛКИ ВОЗЬМУ???? АААААА?
Какие ссылки ?
Полный курс, блин😂 Где TurboVision? Где графика с двойной буферизацией?
Это полный курс для 8 класса )
huita
naverno
прочитал ролик - посрал за 4 часа ))))
Бывает)))