Паскаль с Нуля. Арифметические действия, DIV, MOD. Урок 3

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

00:00 Арифметические действия
03:47 Пример задачи
08:36 DIV и MOD
12:54 Решение задач A
16:44 Решение задач B
20:34 Решение задач C
30:09 Домашнее задание

Данный курс посвящён изучению языка программирования Pascal. Во время уроков мы с нуля изучим все основы программирования и основные операторы. Курс подойдёт школьникам которые только начинают изучать программирование.

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

В данном уроке будет рассказано об основных арифметических операциях, которые можно использовать в языке Pascal, а так же о приоритетах их выполнения. Подробнее рассмотрим операции целочисленного деления (div) и остатка от целочисленного деления (mod). Ну и как всегда порешаем задачи на данные темы и получим домашнее задание

[okryjnost]

Какой хороший вы человек, очень понятно объясняете, каждый урок делаю конспекты по всем темам и программам, сейчас в 8 классе хочу для школы изучить Паскаль, а потом для будущего изучить" Питончика" По вашим же урокам, спасибо вам 🙏❤

[sarvardzhurakulov]

Ты лучший поверь... Я смотрел и научился 👌

[bekaakramov]

спасибо за урок друг. так же сделал еще. чтобы высчитывал еще количество дней. вот пример;
program remainderInSeconds;
var minuts, second, hours, num, day: integer;
{*Введите число секунд: 8325
0 д. 2 ч. 18 м. 45 с.*}
begin
write('Введите число секунд: ');
read(num);
day:= num div 86400;
num:= num mod 86400;
hours:= num div 3600;
num:= num mod 3600;
minuts:= num div 60;
second:= num mod 60;
writeln(day, ' д. ', hours, ' ч. ', minuts, ' м. ', second, ' с.');
end.

[Mohito_]

Урок посложнее чем 2 прошлых, но с вами всё понятно

[ZabytajaRussia]

спасибо огромное! плачу институту деньги, чтобы учиться в итоге по бесплатным роликам с ютуба. тк институтские лекцие не удобоваримые

[leonatos]

program movie;
var t, h, m: integer;
begin
writeln('Введите длительность фильма в минутах! ');
read(t);
h:= t div 60;
m:= t mod 60;
write(h, 'часов.', m, 'минут.');
end.

[gregormendel]

19:09 с шестой строчкой умно придумано, я бы не догадался)

[Nektarina]

Спасибо за ваши понятные и такие интересные уроки! Смотрю, учусь и наслаждаюсь. У вас очень приятный голос и внешность. Купила ваш курс на степике, но так и не поняла, в чём разница между платной и бесплатной версией? Так же интересно, будет ли продолжение курса по Паскалю платное или бесплатное и планируете ли?

[FARMER_]

Хоть я в 6 классе мы только начали работать в абс и мы работаем с помошью Drawman тоесть чертежник но я уже понимаю програмирование для 8 класса😂

[dtubpom]

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

[morda]

program dzfilma;
var t, m, s: integer;
begin

write ('Введите продолжительность фильма в минутах: ');
read (t);
m := t div 60;
s := t mod 60;
write ('Фильм идет ', m, ' часа ', s, ' минут' );

end.

[nixwolx]

Помогите решить задачу

Вася на своем Ден рождения купил круглый и вкусный торт.
Вася не знал сколько гостей придет на его ден рождения.Поэтому нужно разработат алгоритм согласно которого он сможет быстро разрезат торт на N равных частей.Следует учесть, что разрезы торта можно производить как по радиусу и по диаметру

[redvanzaitullaev]

Program Domashka;
var t, h, m: integer;
Begin
Write ('Введите продолжительность фильма в минутах:);
read (t);
h:= t div 60;
m: = t mod 60;
write ('Фильм идет', h, 'часа', m, 'минут');
End.

[artem]

Здравствуйте, отличный курс! Но почему после шестого урока недоступны еще 2 последних?

[Music_King]

может кто-то подсказать, почему в задаче с, он написал start:= 8*60 а не 8*30

[bekaakramov]

Ответ дз:
program pipipupucheek;
var num, minuts, hours: integer;
begin
write('введите продолжительность фмльма в минутах: ');
read(num);
hours:= num div 60;
minuts:= num mod 60;
writeln('Фильм идет ', hours, ' часа ', minuts, ' минут.');

end.

[radomirgavrilin]

чет я не допер задачи 2 последнии в уроке

[xmxclnn]

program movie;
var t, ch, m:integer;
begin
writeln('Введите продолжительность фильма в митунах: ');
read(t);
ch:= t div 60;
m:= t mod 60;
write('Фильм идёт ', ch, ' часа ', m, ' минут');
end.

[olsy]

Почему дз по сложности как первая задача?

[jiwfqve]

program dz;
var t, ch, m:integer;
begin
write('Введите продолжительность фильма в минутах: ');
read(t);
ch:=t div 60;
m:=t mod 60;
write('Фильм идёт ', ch, ' ч ', m, ' мин ');
end.