Question

Записать программу задачи. Спросить возраст (полное число лет) у мамы и ребенка, посчитать во сколько раз мама старше ребенка и вывести ответ. язык программирования паскаль

Answer 1

                                         PascalABC.NET

begin

 var mom := ReadInteger('Введите возраст матери:');

 var child := ReadInteger('Введите возраст ребенка:');

 print('Мама старше ребенка в', mom / child, 'раза');

end.

Answer 2

Вот пример программы на языке Pascal, которая решает задачу, описанную вами:

pascalCopy code
program AgeComparison;

var
  mamaAge, childAge, ageRatio: Integer;

begin
  // Ввод возраста мамы
  WriteLn('Введите возраст мамы:');
  ReadLn(mamaAge);

  // Ввод возраста ребенка
  WriteLn('Введите возраст ребенка:');
  ReadLn(childAge);

  // Подсчет во сколько раз мама старше ребенка
  ageRatio := mamaAge div childAge;

  // Вывод результата
  WriteLn('Мама старше ребенка в ', ageRatio, ' раз(а).');

  ReadLn;
end.

Программа запрашивает возраст мамы и ребенка, вычисляет отношение возраста мамы к возрасту ребенка (во сколько раз мама старше ребенка) и выводит результат на экран.