Как найти на делимое число в паскале

Описание презентации по отдельным слайдам:

• 

  1 слайд

  Пример Решения задачи нахождения остатка от деления двух целых чисел в Pascal 5 способами.

• 

  2 слайд

  Цель : показать разнообразие способов решения задач в Паскале на примере одной задачи.

• 

  3 слайд

  1 способ с помощью операторов div и mod
  var a,b: integer;
  begin
  write (‘Введите а = ‘);
  readln (a);
  write (‘Введите b = ‘);
  readln (b);
  if b<> 0 then begin
  writeln(‘Целая часть = ‘, a div b);
  writeln(‘Остаток = ‘, a mod b);
  end
  else
  writeln(‘Ошибка! Деление на 0!’);
  end.

• 

  4 слайд

  var a,b: integer;
  begin
  write (‘Введите а = ‘);
  readln (a);
  write (‘Введите b = ‘);
  readln (b);
  if b<> 0 then begin
  writeln(‘Целая часть = ‘, a div b);
  writeln(‘Остаток = ‘, a-b * (a div b));
  end
  else
  writeln(‘Ошибка! Деление на 0!’);
  end.
  2 способ с помощью одного оператора div

• 

  5 слайд

  var a,b: integer;
  begin
  write (‘Введите а = ‘);
  readln (a);
  write (‘Введите b = ‘);
  readln (b);
  if b<> 0 then begin
  writeln(‘Целая часть = ‘,trunc(a/b));
  writeln(‘Остаток = ‘,round(frac(a/b)*b));
  end
  else
  writeln(‘Ошибка! Деление на 0!’);
  end.
  3 способ с  помощью функции отбрасывания дробной части числа trunc и функции возвращения дробной части аргумента frac

• 

  6 слайд

  var a,b,q,r: integer;
  begin
  writeln (‘Введите делимое a’);
  readln (a);
  writeln (‘Введите делитель b’);
  readln (b);
  r:=a;
  q:=0;
  repeat
  r:=r-b;
  q:=q+1;
  until r<b ;
  writeln (‘Целая часть = ‘,q, ‘Остаток = ‘,r );
  end.
  4 способ с помощью цикла repeat

• 

  7 слайд

  var a,b,q,r: integer;
  begin
  writeln (‘Введите делимое a’);
  readln (a);
  writeln (‘Введите делитель b’);
  readln (b);
  r:=a;
  q:=0;
  while r>=b do
  begin
  r:=r-b;
  q:=q+1;
  end;
  writeln (‘Целая часть = ‘,q, ‘Остаток = ‘,r );
  end.
  5 способ с помощью цикла while

• 

Краткое описание документа:

Работа посвящена вопросам программирования. Применительно для учеников 8 класса, после изучения темы:Циклы. В работе показано разнообразие способов решения задачи программирования
на примере одной задачи. Пример: задача нахождения остатка от деления двух целых чисел. Язык программирования Pascal . Рассмотрено пять способ решения поставленной задачи.

Найдите материал к любому уроку, указав свой предмет (категорию), класс, учебник и тему:

6 256 016 материалов в базе

Найти материалы

Вам будут интересны эти курсы:

• Курс повышения квалификации «Информационные технологии в деятельности учителя физики»

• Курс повышения квалификации «Внедрение системы компьютерной математики в процесс обучения математике в старших классах в рамках реализации ФГОС»

• Курс повышения квалификации «Организация работы по формированию медиаграмотности и повышению уровня информационных компетенций всех участников образовательного процесса»

• Курс повышения квалификации «Облачные технологии в образовании»

• Курс профессиональной переподготовки «Информационные технологии в профессиональной деятельности: теория и методика преподавания в образовательной организации»

• Курс повышения квалификации «Использование компьютерных технологий в процессе обучения в условиях реализации ФГОС»

• Курс повышения квалификации «Специфика преподавания информатики в начальных классах с учетом ФГОС НОО»

• Курс повышения квалификации «Введение в программирование на языке С (СИ)»

• Курс профессиональной переподготовки «Теория и методика обучения информатике в начальной школе»

• Курс профессиональной переподготовки «Математика и информатика: теория и методика преподавания в образовательной организации»

• Курс повышения квалификации «Современные языки программирования интегрированной оболочки Microsoft Visual Studio C# NET., C++. NET, VB.NET. с использованием структурного и объектно-ориентированного методов разработки корпоративных систем»