Дополнительное задание Параграф 23 ГДЗ Семакин 8 класс (Информатика)

Задача

Домашнее задание №26. Тема: «Ветвления на Паскале. Программирование диалога с компьютером»

Составьте на Паскале программу определения минимума из трёх чисел с использованием логических операций. Программа должна иметь дружественный интерфейс.
Составьте на Паскале программу, которая запрашивает возраст двух детей (Саши и Маши), а затем выводит информацию о том, кто из них старше.
Запишите на языке Паскаль программу, которая по номеру дня недели будет выводить его название.
Что вычисляет приведённая ниже программа?
Program example;
Var x, y, z, i: integer;
Begin
  ReadLn(a, b, c);
  i := 0;
  If a > 0 then i := i + 1;
  If b > 0 then i := i + 1;
  If c > 0 then i := i + 1;
  WriteLn(i)
End.

Практическое задание №22. Тема: «Ветвления на Паскале. Программирование диалога с компьютером»

1 уровень сложности

Дано целое число $$A$$. Если значение $$A > 0$$, то необходимо увеличить его на единицу. Написать программу для решения этой задачи. Программа должна иметь дружественный интерфейс. Протестировать программу для $$A=5$$, $$A=-4$$, $$A=0$$.
Дано целое число $$A$$. Если значение $$A < 0$$, то необходимо удвоить его. Написать программу для решения этой задачи. Программа должна иметь дружественный интерфейс. Протестировать программу для $$A=6$$, $$A=-10$$, $$A=0$$.
Дано целое число $$A$$. Если значение $$A \ne 0$$, то необходимо уменьшить его на 4. Написать программу для решения этой задачи. Программа должна иметь дружественный интерфейс. Протестировать программу для $$A=2$$, $$A=-1$$, $$A=0$$.
Дано целое число $$A$$. Если значение $$A > 0$$, то необходимо увеличить его на единицу, иначе уменьшить на 1. Написать программу для решения этой задачи. Программа должна иметь дружественный интерфейс. Протестировать программу для $$A=3$$, $$A=0$$, $$A=-12$$.
Дано целое число $$A$$. Если значение $$A=0$$, то необходимо увеличить его на 3, иначе присвоить $$A$$ значение, равное 0. Написать программу для решения этой задачи. Программа должна иметь дружественный интерфейс. Протестировать программу для $$A=0$$, $$A=-1$$, $$A=8$$.
Даны два действительных числа $$X$$ и $$Y$$. Если $$X>Y$$, то вычислить произведение этих чисел, иначе их сумму. Программа должна иметь дружественный интерфейс. Протестировать программу на трёх различных тестах ($$X>Y$$, $$X=Y$$ и $$X<Y$$).

2 уровень сложности

Даны два действительных числа $$X$$ и $$Y$$, не равные друг другу. Заменить меньшее из этих чисел половиной их суммы, а большее — их удвоенным произведением. Программа должна иметь дружественный интерфейс.
Точка $$A$$ задана координатами $$X,Y$$. Написать программу, которая выводит слово «Принадлежит», если точка принадлежит заштрихованной области (см. рисунок 1), и «Не принадлежит» в противном случае. Программа должна иметь дружественный интерфейс. Протестировать программу для точек $$(1.5,2)$$, $$(0,0)$$, $$(-1.5,1)$$, $$(1,-1.2)$$, $$(-2,-1)$$. Рис. 1.
Точка $$A$$ задана координатами $$X,Y$$. Написать программу, которая выводит слово «Принадлежит», если точка принадлежит заштрихованной области (см. рисунок 2), и «Не принадлежит» в противном случае. Программа должна иметь дружественный интерфейс. Протестировать программу для точек $$(2.5,2)$$, $$(1,1)$$, $$(0,0)$$, $$(1,0)$$, $$(2,-1)$$. Рис. 2.
Точка $$A$$ задана координатами $$X,Y$$. Написать программу, которая выводит слово «Принадлежит», если точка принадлежит заштрихованной области (см. рисунок 3), и «Не принадлежит» в противном случае. Программа должна иметь дружественный интерфейс. Протестировать программу для точек $$(0,0.8)$$, $$(0,0)$$, $$(-1.5,1)$$, $$(1,1.5)$$, $$(-2,-1)$$. Рис. 3.
Составить на Паскале программу определения минимума из трёх чисел без использования логических операций. Программа должна иметь дружественный интерфейс (ввод данных осуществляться в режиме диалога). Протестировать программу на следующих исходных данных: а) $$2,\ 5,\ 1$$; б) $$0,\ -2,\ 8$$; в) $$-4,\ 5,\ 10$$.
Разработать программу для подсчёта количества отрицательных чисел среди целых чисел $$a$$, $$b$$, $$c$$. Программа должна иметь дружественный интерфейс. Протестировать программу для всех возможных случаев (когда количество отрицательных чисел равно 0, 1, 2 и 3).

3 уровень сложности

Составить на Паскале программу, которая по введённому номеру месяца выводит название времени года. При написании программы использовать логические операции. При неверном вводе месяца должно выдаваться сообщение об ошибке ввода, и программа должна прекращать свою работу. Программа должна иметь дружественный интерфейс. Протестировать программу на всех целых числах от 0 до 13.
Треугольник задан длинами сторон $$A$$, $$B$$, $$C$$. Написать программу, определяющую, существует ли данный треугольник. Для решения этой задачи использовать сложные логические условия. Программа должна иметь дружественный интерфейс. Протестировать программу для следующих исходных данных: а) $$A=3,\ B=4,\ C=5$$; б) $$A=1,\ B=1,\ C=1$$; в) $$A=0,\ B=4,\ C=5$$; г) $$A=-3,\ B=6,\ C=5$$; д) $$A=2,\ B=1,\ C=8$$.
Разработать программу для отыскания $$\max(\min(a,b),\min(c,d))$$, не используя сложные логические условия и вложенные ветвления. Числа $$a,b,c,d$$ — целые. Программа должна иметь дружественный интерфейс. Протестировать программу для следующих исходных данных: а) $$a=4,\ b=5,\ c=6,\ d=9$$; б) $$a=2,\ b=1,\ c=6,\ d=9$$; в) $$a=2,\ b=1,\ c=8,\ d=4$$; г) $$a=12,\ b=1,\ c=6,\ d=9$$.
Точка $$A$$ задана координатами $$X,Y$$. Написать программу, которая выводит слово «Принадлежит», если точка принадлежит заштрихованной области (см. рисунок 4), и «Не принадлежит» в противном случае. Программа должна иметь дружественный интерфейс. Протестировать программу для точек $$(0,0)$$, $$(1,0)$$, $$(1.5,1)$$, $$(-1,1.5)$$, $$(-2,-1)$$, $$(2,-1)$$, $$(1,-1)$$, $$(-1,1)$$. Рис. 4.
Точка $$A$$ задана координатами $$X,Y$$. Написать программу, которая выводит слово «Принадлежит», если точка принадлежит заштрихованной области (см. рисунок 5), и «Не принадлежит» в противном случае. Программа должна иметь дружественный интерфейс. Протестировать программу для точек $$(0,0)$$, $$(1.5,1)$$, $$(2,1)$$, $$(1,-1)$$, $$(-0.5,-0.2)$$, $$(-2,-1)$$, $$(-1,-2)$$, $$(-1,1)$$, $$(-3,1)$$. Рис. 5.
Точка $$A$$ задана координатами $$X,Y$$. Написать программу, которая выводит слово «Принадлежит», если точка принадлежит заштрихованной области (см. рисунок 6), и «Не принадлежит» в противном случае. Программа должна иметь дружественный интерфейс. Протестировать программу для точек $$(0,0)$$, $$(2,2)$$, $$(0.5,0.5)$$, $$(0.5,-1.5)$$, $$(-0.5,0.5)$$, $$(-2,-1)$$, $$(-1,-2)$$, $$(-1,1)$$, $$(2,0)$$. Рис. 6.

Подробный ответ

1. Минимум из трёх чисел можно найти поэтапно: сначала сравнить первые два числа, затем полученный минимум сравнить с третьим.

2. Для определения старшего ребёнка достаточно сравнить два возраста и отдельно учесть случай равенства.

3. Название дня недели удобно выводить с помощью оператора case.

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

program task_2;
var
  a, b, c, min: integer;
begin
  writeln(‘Введи три числа через пробел’);
  readln(a, b, c);
  if b < a then min := b else min := a;
  if c < min then min := c;
  writeln(‘min=’, min)
end.

program task_2;
var
  a, b: integer;
begin
  write(‘Привет! Сколько полных лет Саше?: ‘);
  readln(a);
  write(‘Сколько полных лет Маше?: ‘);
  readln(b);
  if a > b then writeln(‘Саша старше Маши’)
  else if a = b then writeln(‘Саша и Маша ровесники’)
  else writeln(‘Маша старше Саши’);
end.

program task_5;
var
  c: byte;
begin
  write(‘Привет! Введи номер любого дня недели: ‘);
  readln(c);
  case c of
    1: writeln(‘Это понедельник’);
    2: writeln(‘Это вторник’);
    3: writeln(‘Это среда’);
    4: writeln(‘Это четверг’);
    5: writeln(‘Это пятница’);
    6: writeln(‘Это суббота’);
    7: writeln(‘Это воскресенье’);
  end;
end.

Программа вычисляет количество введённых чисел, больших $$0$$.

Ответ

1) Минимум из трёх чисел.
2) Выводит, кто старше: Саша, Маша или что они ровесники.
3) Выводит название дня недели по его номеру.
4) Считает количество положительных чисел среди трёх введённых.