Ребята по информатике, я не знаю как это делать, мы на уроке записали тока букву м это меню, а дальше не знаю к

о

меню

п

ь

ю

т

е

р

Трудолюбивые лошади человеку уже много тысяч лет.

Сельское хозяйство: До изобретения машин человек использовал лошадей для распашки земли, переработки и перевозки урожая.

Война: Степные воины запрягали коней в лёгкие повозки - колесницы. Позже лошади возили на себе свирепых стрелков и рыцарей во время сражений.

Транспорт: Раньше лошади перевозили людей и почту на большие расстояния. Они считались самым быстрым наземным транспортом.

Спорт: К конным видам спорта относят поло, конкур, родео и другие. Также людям нравятся скачки, и они играют на ипподроме, ставя деньги на коня, который, по их мнению, придёт первым.

УдАчИ

Думаю, что такая операция возможна. Например:
//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
begin
  //цикл с параметром
  for var i := 1 to 3 do
  begin
    var a := ReadInteger('Введите число а');
    println(a);
  end;
  // цикл с предусловием
  var i := 1;
  while i < 3 do
  begin
    var a := ReadInteger('Введите число а');
    println(a);
    i := i + 1;
  end;
  // Цикл с потусловием
  i := 1;
  repeat
    var a := ReadInteger('Введите число а');
    println(a);
    i := i + 1;
  until i > 3; 
end.